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EXPERIENCIA Y PRACTICAS EN LOGO 




L LOGO es un Lenguaje de 
Programación diferente, 
Con él podemos dibujar, es- 
cribir, hacer cálculos mate- 
máticos y un montón de co- 
sas más, que ya iremos des- 
cubriendo. 

Es un Lenguaje senci- 
llo y entretenido, Posee un personaje simpáti- 
co con el que podemos hacer infinidad de co- 
sas, Es la TORTUGA del LOGO. 

Esta Tortuga es capaz de pintar, borrar, 
rellenar, saltar, va a poder orientarse hacia to- 
das las direcciones y se va a poder colocar en 
cualquier posición de la pantalla. 

Te voy a presentar a la Turtuga de 

Logo. 


Coge tu ordenador y carga el Logo, Una 
vez que se haya cargado te aparecerá la si- 
guiente pantalla: 


LOGO VERSION 1.0 LOGO MA TIC 
© 1987 I.N.P 

BIENVENIDOS AL LOGO 


Luego el Logo nos da la bienvenida y 
nos indica mediante la aparición de una in- 
terrogación y del cursor, que tu ordenador ya 
está dispuesto a recibir órdenes. No te preo- 
cupes si alguna de las órdenes que le das no 
es correcta: el Logo te lo dirá y te avisará dón- 
de y qué tipo de error has cometido. 

En la mayoría de los ordenadores, esta 
pantalla de presentación es prácticamente 
igual. 

Teclea e introduce la siguiente orden al 
ordenador: 


?MUESTRATORTUGA 



Te aparecerá en el centro de la panta- 
lla la famosa Tortuga. 


LOGO VERSION LO LOGOMATIC 
© 1987 I.N.P 

BIENVENIDOS AL LOGO 
? MUESTRA TORTUGA 



En ella puedes observar varios men- 
sajes. 

Uno de ellos dice la versión de qué se 
trata y por quién está realizada. 

A continuación el mensaje de “Copy- 
righ” nos dice simplemente que el programa 
no puede ser copiado de una forma legal. 


La Tortuga no es tal, es simplemente un 
triángulo que simula la forma de una tortuga. 
Aparece en el centro de la pantalla y orienta- 
da hacia arriba. Es importante que te fijes en 
la punta más pronunciada del triángulo. Va a 
ser la que señala en todo momento la orienta- 
ción o rumbo que tiene la Tortuga, Siempre se 
moverá en la dirección en la que esté orien- 
tada esta punta. 




C021 el Logo puedes escribir tus órdenes en castellano . 
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EXPERIENCIA T PRACTICAS EN LOGO 


Se podrán comparar con la flecha que 
tienen las brújulas: 


? PANTALLAMIXTA 
? BP 
? MT 



El Norte coincidiría con 0 o o 360°, El Este 
con 90° el Sur con 180 y el Oeste con 270°. 
Ahora teclea e introduce lo siguiente: 


?PANTALL AMIXTA 



COLOCACION DE LA TORTUGA 
EN LA POSICION DE COMIENZO 

? GI 90 
? SL 

? AV 125 
? GD 90 
? BL 


DIBUJO LA 1. a LETRA 

? AV 50 RE25 GD 60 AV 50 
? GI 90 AV 25 RE 50 

LA POSICIONO EN EL COMIENZO 
DE LA 2. a LETRA 

? SL 
? GD 90 
? AV 15 
? GI 90 
? BL 


DIBUJO LA 2. a LETRA 

? REPITE 4 [AV 50 GD 90] 

? GD 90 AV 50 GI 90 


Observarás que se ha borrado todo lo 
que había escrito y el cursor se ha situado más 
abajo. Tienes sólo unas cuantas líneas abajo 
para escribir tus órdenes. 



Ya estamos dispuestos para ver lo que 
es capaz de hacer la Tur tuga. 

Introduce las siguientes órdenes: 

NUESTRO MENSAJE DE BIENVENIDA 

SELECCION DE PANTALLA 
Y ESTADO DE LA TORTUGA 


LA POSICIONO EN EL COMIENZO 
DE LA 3. a LETRA 

? SL 
? GD 90 
? AV 15 
? GI 90 
? BL 


DIBUJO LA 3. a LETRA 

? AV 50 RE 50 
? GD 90 AV 50 
? GI 90 


LA POSICIONO EN EL COMIENZO 
DE LA 4. a LETRA 

? SL 
? GD 90 
? AV 15 
? GI 90 
? BL 


No te olvides de pulsar RETURN después de escribir 
una orden. 
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DIBUJO LA 4. a LETRA 

? REPITE E [AV SO GD 90] 

? GI 90 RE 25 
? GI 90 RE 50 

Si quieres puedes sustituir la tercera or- 
den que has introducido (MT) por OT. 

¿Qué ha ocurrido? 

Lo mismo, ¿verdad? Pero, ¿y la tortuga? 

Ha desaparecido. 

Por si todo este lío de órdenes que has 
introducido han despertado tu interés, analí- 
zalas de nuevo sabiendo que: 

MT equivale a poner MUESTR ATOR- 
TUGA. 

OT equivale a poner OCULTATORTU- 
GA, 

BP equivale a poner BORRAPANTA- 

LLA. 

GD equivale a poner GIRADERECHA. 

GI equivale a poner GIRAIZQUIERDA. 

AV equivale a poner AVANZA. 

RE equivale a poner RETROCEDE. 

BL equivale a poner BAjALAPIZ, 

SL equivale a poner SUBELAPIZ. 

Aquí está REPITE, ya puedes olvidarte 
de lo pesado que es hacer una misma cosa mu- 
chas veces. 

Vamos a explicar un poco lo que hacen 
las órdenes que has introducido, 

Las tres primeras órdenes nos inicial! - 
zan el estado de la pantalla y el estado de la 
tortuga. 

Las cinco siguientes colocan a la tortu- 
ga en la posición en donde voy a empezar a 
pintar la primera letra. 

A continuación, pinto la H, Eso lo hago 
con las dos siguientes órdenes! Las cinco si- 
guientes me colocan en la posición en donde 
quiero que se empiece a pintar la O. La orden 
siguiente pinta la O. Para situarme en donde 
quiero pintar la L, le introduzco las cuatro ór- 
denes que siguen. La siguiente pinta la L. Ló- 
gicamente las cinco que hay después nos co- 
locan en el comienzo de la última letra, y las 
dos siguientes pintarán la A. 

No pienses que estas órdenes vas a te- 
ner que teclearlas siempre que quieras ver lo 
que hacen. Aprenderemos a almacenarlas 
para así poder disponer de ellas siempre que 
queramos. 


Si quieres practicar, cambia los valores 
que hay y observa cómo varían las órdenes. 

Por ejemplo, podrías cambiar el tama- 
ño de las letras. Fíjate que en las órdenes con 
que dibujas las diferentes letras aparece un 
número que se repite en todas. Es 50. Esto sig- 
nifica que las letras son cuadradas y que tie- 
nen 50 puntos, tanto en horizontal como en 
vertical, 

La tortuga comienza a dibujar cada le- 
tra desde el extremo inferior izquierdo de 
cada letra y al terminar se posiciona en eí ex- 
tremo inferior derecho. 


Si varías el valor 50 variarás el tamaño 
de la letra, pero hazlo en todos los sitios don- 
de aparezca 50; ya que si no las letras saldrán 
desproporcionadas. 

Observa también que en las letras H y 
A hacemos un avance y un retroceso (25) que 
es justo la mitad del tamaño de nuestra letra 
(50). Sí varías el tamaño no te olvides de va- 
riar también este valor, que tendrá que ser la 
mitad del nuevo valor que hayas dado al ta- 
maño de las letras. 

También puedes cambiar la separación 
entre las letras. Eso es muy fácil, ya que si ob- 
servas las órdenes con las que desplazo a la 
tortuga hasta el comienzo de la siguiente le- 
tra, son las mismas en todas ellas. 

En este caso avanzo 15 puntos que 
corresponden a la separación que le hemos 
dado. Varía este valor y variarás la separación 
entre las letras. 

Bueno, ya has visto que con el LOGO 
se pueden dibujar palabras en el ordenador. 
Ya aprenderás cómo se hacen y podrás sor- 
prender a tus amigos con saludos como éste. 

Veamos algo más: 




No te olvides de dejar un espacio entre dos órdenes ni 
entre una orden y su argumento . 



EXPERIENCIA T PRACTICAS EN LOGO 



Fíjate que con el Logo también se pue- 
den hacer círculos. Lo podemos hacer utilizan- 
do únicamente las órdenes que hemos usado 
hasta ahora. 

Seguro que reconoces lo siguiente: 



Estas son las órdenes para realizarlos: 


AROS OLIMPICOS 
SELECCION DE PANTALLA 
Y ESTADO DE LA TORTUGA 


? PM 
? BP 
? OT 
? SL 

CENTRANDO DIBUJO 

? GI 90 AV 60 
? GD 90 AV 50 


DIBUJA LOS TRES AROS SUPERIORES 
? BL 

? REPITE 3 [REPITE 36[AV 4 GD 10]SL 

GD 90 AV 35 GI 90 BL] 


SITUO LA TORTUGA DONDE EMPIEZA 
A DIBUJAR LOS DOS AROS INFERIORES 

? SL 

? RE 35 GI 90 
? AV 87 GD 90 

DIBUJA LOS DOS AROS INFERIORES 

? BL 

? REPITE 2JREPITE 36[AV 4 GD 90JSL 
GD 90 AV 35 GI 90 BL] 

Como ves, con las órdenes que antes 
usábamos para pintar una palabra, ahora po- 
demos hacer un dibujo a base de circun- 
ferencias. 

Fíjate bien cómo hace este dibujo. 

Lo primero que hacemos es situar a la 
tortuga en un sitio determinado para que el di- 
bujo nos quede más o menos centrado. 

Una vez colocada en el sitio deseado, 
dibujo los tres aros superiores. 

Aquí lo único que se hace es repetir 
tres veces el mismo dibujo (una circunferen- 
cia) y cuando termino de dibujar la primera 
nos situamos en donde queremos empezar a 
dibujar la segunda. Igual ocurre entre la se- 
gunda y la tercera. Por eso, después de dar 
las órdenes para que dibuje un aro, le damos 
otras para que se posicione en el sitio idóneo. 

Una vez que están dibujados los tres 
aros superiores, tenemos que posicionarnos 
en dónde queremos empezar a pintar los dos 
aros inferiores y simplemente repetir el pro- 
ceso anterior, pero ahora únicamente dos ve- 
ces. 


CUADRO RESUMEN 

Muestratortuga (MT) 

Hace aparecer la tortuga en la posi- 
ción en que se encuentra en un momento 
determinado, 

Si esta orden se da nada más comen- 
zar, la tortuga aparece en el centro de la 
pantalla. 

Ocultatortuga (OT) 

Hace desaparecer la tortuga en la 
posición en la que se encuentra, 


Curioso, el Logo es el único lenguaje que te saluda 
cuando entra a trabajar . 
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Pantallamixta (PM) 

Pone la pantalla en la modalidad 

mixta. 

Divide la pantalla en dos zonas diíe- 
renciadas. Una exclusivamente para gráfi- 
cos y otra para textos. En la zona gráfica 
aparecen todos los dibujos que se realicen 
y en la zona de texto escribiremos las órde- 
nes y recibiremos los mensajes posibles 
que nos dé el ordenador. 

Borrapantalla (BP)z 

Borra la zona de la pantalla destina- 
da a los gráficos y posiciona la tortuga en 
el centro. 

Avanza n (AV n) 

Avanza en la dirección en la que la 
tortuga está orientada el número de puntos 
que se especifican en "n", 

Retrocede (RE n) 

Retrocede en la dirección en la que 
la tortuga está orientada el número de pun- 
tos que se especifican en "n". 
Giraderecha n (GD n) 

Gira a la derecha, desde la posición 
en que está la tortuga, el número de grados 
(n) que se especifica. 

Giraizquierda n (GI n) 

Gira a la izquierda, desde la posición 
en que está la tortuga, el número de grados 
(n) que se especifica. 

Bajalápiz (BL) 

Activa el lápiz de la tortuga. 

Desde el momento en que se dá esta 
orden todos los desplazamientos de la tor- 
tuga los hará dejando un rastro tras de sí. 

Subelápiz (SL) 

Desactiva el lápiz de la tortuga. 
Desde que se da esta orden todo des- 
plazamiento de la tortuga los hará sin dejar 
rastro. 


¿Te atreves a realizar 
estos ejercicios? 

1) Dibujar con la tortuga un cuadrado , un 
triángulo y una circunferencia. 

2) ¿Qué cambiarlas para dibujarlo sin la tor- 
tuga? 


3) Dibuja esta escalera. 



4) Dibuja un armario. 

5) ¿Son correctas las órdenes siguientes ? 

BP 

MUESTRA TORTUGA 

AV50 

GI 90 

AVANZA 60 
GDERECHA 90 
AVANZA 3000 
GD 360 


Solución a los ejercicios 

1. a) LADO = 50 

CUADRADO 

ÍNICIALIZACION 

? PM 
? SL 
? BP 
? MT 


CENTRANDO DIBUJO 

? GD 45 
? AV 25 
? GD 135 

DIBUJO CUADRADO 


9 

■ 

BL 




9 

■ 

AV 

50 

GD 

90 

9 

< 

AV 

50 

GD 

90 

9 

4 

AV 

50 

GD 

90 

? 

AV 

50 

GD 

90 


Con el logo es muy fácil dibujar , Con otros te las ves y 
te las deseas . 
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O BIEN 

DIBUJO CUADRADO 
? BL 

? REPITE 4[AV 50 GD 90] 

b) LADO = 50 

TRIANGULO 
INICIALIZACION 
? PM 
? SL 
? BP 
? MT 

CENTRANDO DIBUJO 
? GD 90 
? RE 25 

DIBUJO TRIANGULO 
? BL 

? AV 50 GI 120 
? AV 50 GI 120 
? AV 50 GI 120 

O BIEN 

DIBUJO TRIANGULO 
? BL 

? REPETIR 3[AV 50 GI 120] 

c) CIRCUNFERENCIA 

INICIALIZACION 

? PM 
? SL 
? BP 
? MT 

CENTRANDO DIBUJO 
? Gi 90 
? AV 50 
? GD 90 

DIBUJO CIRCUNFERENCIA 
? BL 

? REPITE 36[AV 4 GD 10] 

O BIEN 

DIBUJO CIRCUNFERENCIA 
? BL 

? REPITE 36[AV 8 GD 10] 

2, La orden que hace desaparecer la tortuga 

; 

OCULTATORTUGA (OT) 


Si la introduces en lugar de MT en todos 
los dibujos, la tortuga no se verá. 

ESCALERA 
INICIALIZANDO 
? PM 
? SL 
? BP 
? OT 

CENTRANDO DIBUJO 
? GI 90 
? AV 15 
? GD 90 
? AV 90 

DIBUJO LATERALES 
? BL 
? RE 135 
? GD 90 
? SL 
? AV 25 
? GI 90 
? BL 

? AV 135 
? RE 8 
? GI 90 

DIBUJO PELDAÑOS 
? REPITE 9[AV 25 RE 25 GD 90 RE 14 
GI 90] 

4. ARMARIO 

INICIALIZACION 
? PM 
? SL 
? BP 
? OT 

CENTRANDO DIBUJO 
? RE 50 
? GI 90 

DIBUJO ARMARIO 
? BL 

? AV 25 GD 90 
? AV 125 GD 90 
? AV 50 GD 90 
? AV 125 GD 90 
? AV 25 GD 90 
DIBUJO PUERTAS 


? 

SL 




k 

AV 5 



? 

BL 




0 

* r 

GI 

90 

AV 

20 

? 

GI 

90 

AV 

115 

? 

1 

GI 

90 

AV 

40 

-o 

GI 

90 

AV 

115 

n 

GI 

90 

AV 

20 

0 

H 

GI 

90 

AV 

115 


Puedes elegir trabajar viendo 1a tortuga o sin verla , 
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DANDO PROFUNDIDAD 
? SL 

? AV 5 GI 90 
? BL 

? AV 25 GD 135 
? AV 15 GD 45 
? AV 50 GD 135 
? AV 15 Gi 45 
? AV 125 GI 135 
? AV 15 GI 45 
? AV 125 


? AV 10 
? SL 

? GD 90 AV 10 
? GI 90 AV 1 
? BL 
? RE 10 


5. BP: correcta. 


DIBUJO TIRADORES 
? SL 

? CENTRO 
? AV 10 GI 90 
? AV 5 GD 90 
? BL 


MUESTRA TORTUGA: incorrecta. MUES- 
TRA y TORTUGA tienen que ir juntas. 
AV50: incorrecta, AV y 50 tienen que ir 
separadas. 

GI 90: correcta. 

AVANZA 30: correcta. 

GDERECHA 90: no existe esta orden. La 
correcta es GIRADERECHA 90 o bien GD 
90. 

AVANZA 3000: correcta. 

GD 360: correcta. 


■ No te olvides que en los MSX tienes que 
introducir el cartucho del Logo con el ordenador 
apagado . 

En ¡os MSX no tienes que dar ninguna orden 
para que el Logo se cargue . Lo hace 
a utomá ticam en te . 

En el MSX , cuando arranca el Logo y tecleamos 
MT f aparece un muñeco en vez del triángulo ■ Si 
quieres que aparezca el triángulo tienes que teclear 
la orden TORTUGA . 

En el Spectrum la orden SUBELAPIZ (SL) es 


SINLAPIZ (SL) y BAJ ALAPIZ (BL) es CONLAPIZ 
(CL). 
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NA de las características 
más importantes que tienen 
los ordenadores que actual- 
mente se comercializan en 
el mercado es la capacidad 
que tienen de dibujar y rea- 
lizar gráficos en colores de 
una forma rápida y sencilla. 
Es posible que el BOOM informático en el que 
nos encontramos inmersos no se hubiese dado 
si no tuviesen esta capacidad gráfica, pues se 
puede decir que un ordenador que dibuja 
deja de ser una fría máquina para pasar a ser 
un caluroso amigo. 

Todo gráfico o dibujo que queramos 
realizar lo veremos plasmado en la pantalla de 
nuestro ordenador. Pero antes es necesario 
entender qué es. cómo es, qué características 
tiene y cómo se usa nuestra pantalla en la que 
trabajaremos como si de un lienzo de pintura 
se tratase. 

Forma y dimensiones 
de la pantalla 

La pantalla de nuestro ordenador está 
dividida en cuadraditos invisibles. En cada 
uno de ellos cabe una letra o un número. Es- 
tos cuadraditos están numerados para que el 
ordenador y nosotros podamos referirnos a 
ellos, 

Nuestra pantalla está dividida en líneas, 
y cada línea tiene un cierto número de cua- 
draditos. Por ejemplo, en el SPECTRUM, tene- 
mos 22 líneas con 32 cuadraditos en cada lí- 
nea. Para referirnos a ellas, y para que el or- 
denador nos entienda, las numeraremos de la 
siguiente forma: 

Las líneas del 0 al 21 y los cuadraditos 
o caracteres de cada línea del 0 al 31, 


De esta manera nos podemos referir a 
cualquier parte de la pantalla con sólo decir 
su número de línea y el número de cuadradi- 
to dentro de dicha línea. 

Ya hemos dicho cómo es la pantalla en 
el SPECTRUM (ver fig. 1). En el AMSTRAD te- 
nemos tres modos distintos de pantalla, que 
numeraremos como 0, 1 y 2, con distintas di- 
mensiones cada uno de ellos. 


0 12 3 28 29 30 31 



Fig. L— Aunque el Spectrum tiene 24 cintas Jas dos últi- 
mas están reservadas al ordenador. 


En el modo 0, tenemos 25 líneas de 20 
caracteres o cuadraditos en cada línea. En el 
modo 1 seguimos teniendo 25 líneas, pero esta 
vez con 40 caracteres por línea. Y en el modo 
2 tenemos 80 caracteres por línea y las mis- 
mas 25 líneas. 

La forma de numerar las líneas en el 
AMSTRAD es de 1 a 25 y los caracteres o cua- 
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draditos de l a 20, 40 u 80, según el modo de lia en el AMSTRAD, ejecuta el programa 1 y fí- 
pantalla en el que nos encontremos. jate en la figura 2. 

Para ver cómo es cada modo de panta- 



MODEO 


1 2 


39 4Ú 




MODE 2 


Fig. 2 —Los modos de pantalla en el Amstrad. 


lo rem ******************************* 

20 REM * PROGRAMA PARA VER LOS MODOS * 

30 REM * DE PANTALLA EN EL AMSTRAD * 

40 REM ******************************* 

SO REM 

SO POR 1=1 TO 2 
70 MODE I 

80 PRINT "ESTAMOS EN EL MODO " ; I ; " DE 

PANTALLA. " 

90 FOR J=1 TO 1000 

1O0 NEXT J 

110 NEXT I 
120 END 


Como podemos apreciar en el progra- 
ma, la instrucción para cambiar de modo de 
pantalla es MODE i, “i" es el número de panta- 
lla que queremos ver. 

En el COMMODORE sólo hay un modo 
de pantalla. Tiene 25 líneas de 40 caracteres 
cada línea. Se numeran de O a 24 las líneas y 
de O a 39 las columnas. 

En el IBM tenemos, al igual que en el 
AMSTRAD, tres tipos de pantalla distintos, 
aunque de momento sólo nos interesa el modo 
0. En este modo la pantalla tiene 24 líneas y 
cada línea puede tener 40 u 80 caracteres. En 
el IBM la forma de cambiar la anchura de la 
pantalla es mediante la sentencia W1DTH n, 
donde "n” es 40 u 80, según queramos tener 40 
u 80 caracteres por línea, 

Para entrar en el modo O en el IBM, sólo 
tenemos que poner: 

SCREEN 0 

En el MSX también hay varios tipos de 
pantalla, pero sólo nos interesan de momento 
dos de ellos, 

SCREEN 0. Pantalla de 24 líneas y de 
40 caracteres por línea. 

SCREEN 1 . Pantalla de 24 líneas y de 
32 caracteres por línea. 


Su numeración, al igual que en el IBM, 
va de 1 a 24 líneas y de 1 a 32 (o 40) columnas. 

Aparte de todo lo dicho, el MSX tiene 
también la sentencia WIDTH, pero la forma de 
actuar es distinta de la del IBM. 

WIDTH fija el número máximo de co- 
lumnas que vamos a utilizar en la pantalla. En 
el modo 0, se podrá variar el número de ca- 
racteres por línea entre 1 y 40, y en el modo 
1 entre 1 y 32. 



12345 

57850 



Fig. 3 —Asi queda ía pantalla en el MSX usan- 
do WID TH 5 . 

Como ejemplo teclea el programa 2, 
Para ilustrar mejor lo dicho hasta ahora, 
propongo el programa 3 para los usuarios del 
SPECTRUM y el 4 para todos los demás, 



70 FOR 1=1 TO 40 
SO WIDTH I 

90 PRINT '125456709012345678901234567890'“ 

tOO FOR J=l TO 1QOO 

I 10 NEXT J 

120 NEXT I 
130 END 
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10 REM ************** ********************** 
20 REM * VI SUALIZ ACION DE LOS CUADRAD I TOS * 
30 REM * EN EL SPECTRUM I 

40 REM ************************************ 

SO REM 

60 FGR X=G TO 255 STEP B 

70 PLQT X,0 

80 ORAN 0,170 

90 NEXT X 

100 FGR y =0 TO 170 BTEF 8 

110 FLOT O, V 

120 DRAM 255,0 

130 NEXT I 

140 OVER 1 

ISO LIST 

160 OVER O 

170 STOP 


1 


í 2 

I 

I 

I 

I 

I 

I 

I 

t 

! 

I 

I 

I 

I 



I 

í 

! 

I 

J 

3 

3 

( 



Fig 4.— Las zonas de la pantalla. 


10 REM ********************************* 

20 REM * VISUAL IZACION DEL NUMERO DE * 
30 REM * LINEAS Y DEL NUMERO DE CARAO- I 
40 REM * TERES POR LINEA PARA TODOS * 
SC» REM * LOS ORDENADORES * 

60 REM ********************************* 

70 REM 

80 REM PONED VUESTRO ORDENADOR EN EL MDDG 
90 REM DE 40 CARACTERES POR LINEA- EN EL 
100 REM SPECTRUM CAMBIAR TODOS LOS 40 DEL 
llO REM LISTADO POR 32. 

120 REM 

130 CLSiREM < — EN EL COMMÜDORE CAMBIARLO 
POR* PRINT ”<SHIFT- HOME>" 

140 FOR 1=1 TO 40 

150 PRINT "*"1 

160 NEXT r 

170 FOR 1—2 TG 23 

1©0 PRINT "*■' ;TABC40> r 1 *” 

190 NEXT I 
200 FOR 1=1 TO 40 
210 PRINT 

220 NEXT 3 
230 END 


■ Las zonas de la pantalla 

Ahora ya estamos preparados para me- 
ternos de lleno a conocer el ordenador, Una 
de las cosas más importantes que hay que sa- 
ber sobre la pantalla es que está dividida en 
zonas. 

Una zona es una subdivisión en vertical 
de la pantalla. Así en el SPECTRUM tenemos 
la pantalla dividida en dos zonas. Una es la que' 
va desde la columna del carácter número O 
hasta la 15. ambas inclusive. La otra va desde 
la columna 16 a la 31. 

En el IBM las divisiones son cada 10 ca- 
racteres, o sea, van de la columna 1 a la 10. de 
la 1 1 a la 20, de la 21 a la 30, etc. 

Para posicionarnos en una zona especí- 
fica utilizaremos la coma (,) desde un PRINT, 
de la siguiente manera: 

PRINT T, “2“, ‘'3", “4" 















lo REM 

*************************** 

* 





20 REM 
30 REM 

* LAS ZONAS De LA PANTALLA * 

********* ********* ********** 





40 REM 

50 PRINT 

11 J 11 

"CA 

H 

J IK ll^ll 

11 4 11 









ul V* 1 íh 1 IX i 

60 PRINT 

* ^ 
DA 

NUMERO EST f 

4 El 

V SU ZGN¿ 

V 




70 PRINT 

80 PRINT 

ih 

k * 

3 " , 

* 1 4 1 1 










90 PRINT 
100 PRINT 

1 10 PRINT 

*' AHORÍ 

\ SOLO 

EN LAS 1 

DOS 

ULTIMAS 

ZONAS 

II 

M J II 

f ! 1 

" 4 *’ 










120 PRINT 

" AHORA SOLO 

OL TIMA" 

EN Lí 

* PRIMERA 

í Y 

EN 

LA 



130 PRINT 

Ü3 r “*i 

i ■■ hi 

i fcl 










140 PRINT 
150 PRINT 

ü 2 
II y 

i -> 

AHORA LAS DOS 

DEl 

_ MEDI 

qii 





160 PRINT 
170 PRINT 

ii | ii 

II ^>11 11 

114.. . 

i 5 n 








ISO PRINT 

"QUE F 

>A5A AHORA?' 

a 








190 END 















Nos aparecerá un uno (1) en el princi- 
pio de la primera zona, un dos (2) en la segun- 
da, un tres (3) en la tercera y un cuatro (4) en 
la cuarta. Para entender mejor todo esto fíjate 
en la figura 4 y ejecuta el programa 5. 


El cursor, cómo posicionarlo 

Hasta ahora hemos aprendido lo que es 
la pantalla del ordenador y su subdivisión en 
diferentes zonas, pero no hemos hablado para 
nada del cursor ni para qué sirve. 

El cursor es ese pequeño cuadradito o 
guión parpadeante que se ve en el ordenador 
cuando lo acabamos de encender y que nos 
indica que está listo para empezar a trabajar. 
El cursor señala la posición donde se imprimi- 
rá el siguiente carácter que pulsemos en el te- 
clado o que le mandemos escribir. 

Cuando el ordenador está esperando 
que pulsemos alguna tecla, el cursor, como ya 
hemos dicho, es visible y está parpadeando, 
pero cuando nos encontramos ejecutando un 



MANEJO DE SPRITES T ELEMENTOS GRAFICOS 


programa, aunque no lo veamos, el cursor si- 
gue estando ahí, 

Cuando en un programa 3e decimos al 
ordenador, que nos escriba algo en la panta- 
lla (mediante la sentencia PRINT), el cursor, ya 
invisible, está diciéndole al ordenador dónde 
tendrá que escribir la próxima vez. Por ejem- 
plo, si escribimos: 

10 PRINT "HOLA" 

20 GOTO 20 

cuando hagamos RUN, el programa imprimirá 
la palabra HOLA y el cursor se quedará a la 
derecha de la A esperando otra sentencia 
PRINT para continuar escribiendo a partir de 
esa posición. Por eso si intercambiamos la lí- 
nea: 

15 PRINT "ADIOS” 

lo que veremos en la pantalla al hacer RUN se- 
ría: 

HOLAADIOS 

y como después de las comillas que cierran la 
palabra ADIOS no pusimos un punto y coma (;) 
el cursor no se quedará a la derecha de la S, 
sino que estará en la línea siguiente, 

Para lograr posicionar el cursor en cual- 
quier parte de la pantalla desde dentro de un 
programa utilizaremos la función LOCATE, 
cuya sintaxis es: 

LOCATE Y,X 

donde Y es la fila a la que nos queremos mo- 
ver y X es el carácter dentro de dicha línea. 
En el MSX los argumentos van al contrario, 
esto es, en vez de poner primero la Y y des- 
pués la X se pone primero la X y después la Y. 

LOCATE X,Y 

Ni que decir tiene que los argumentos 
X e Y, aparte de tener que ser enteros, pue- 
den ser números, variables o cualquier expre- 
sión que dé como resultado un número. 

Si después de la sentencia LOCATE po- 
nemos un PRINT, el mensaje aparecerá en la 
posición dada por X y por Y. Por ejemplo: 

LOCATE 6,10: PRINT "AQUI ESTOY" 

empezará a imprimir la frase “AQUI ESTOY” 
en la columna 10 de la fila 6 (en el MSX se pon- 
dría el mensaje en la columna 6 de la fila 10), 

En el SPECTRUM no existe la sentencia 
LOCATE, pero se puede sustituir por PRINT 
AT Y,X obteniéndose el mismo resultado. Su 
sintaxis es: 

PRINT AT Y,X; "mensaje a imprimir" 


En el COMMODORE no hay ninguna 
función que realice nada parecido, pero utili- 
zando la rutina que se da en este mismo fas- 
cículo en la sección TRUCOS DE PROGRAMA- 
CION se obtienen los mismos resultados. 

A continuación aparece un programa 
de demostración de todo lo que hemos dado 
hasta ahora. 

10 REM ************** ************************* 
20 REM * DEMOSTRACION DE LA SENTENCIA LOCATE * 
30 REM *************************************** 
40 REM 

50 INPUT "En qu& fila imprimo el mensaje "jY 
60 INPUT "En que columna imprimo el mensaje"íX 
70 INPUT "Que mensaje imprimo " 

BÜ REM 

90 LOCATE X f Y 
100 PRINT m 
í ÍO END 

Para el SPECTRUM quitar la linea 80 y 
sustituir la linea 70 por* 

70 PRINT AT Y,XíM* 

Para el COMMODORE sustituir la linea 70 pon 
70 GQSUB 9950 


B El código ASCII 

Desde el principio de este fascículo es- 
tamos hablando de los caracteres. Pero ¿qué 
es un carácter? 

Se denominan caracteres a todas las le- 
tras, números, signos de puntuación y, en ge- 
neral, a cada uno de los 256 caracteres que 
nuestro ordenador tiene almacenados en su 
memoria ROM (memoria de solo lectura). 

El ordenador asigna un número a cada 
carácter. Esto es así para que él, y nosotros, 
podamos referirnos a cualquiera de ellos por 
su número, pues el ordenador no entiende de 
otra cosa que no sean números, La numeración 
de los caracteres es más o menos estándar. 
A la sene de números que relacionan una se- 
rie de caracteres se le llama CODIGO, Al có- 
digo que relaciona estos números con los ca- 
racteres en los microordenadores se le deno- 
mina CODIGO ASCII. 

De los 256 caracteres del CODIGO AS- 
CII, los 32 primeros (del O al 31) son caracte- 
res de control (ya veremos qué significa esto) 
y el resto son caracteres que todos reconoce- 
remos. 

El programa 7 nos muestra todos los ca- 
racteres que tienen un CODIGO ASCII com- 
prendido entre 32 y 255. 
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iO REM M***tt**lt|f»f*í»****f********t****lt**** 

20 REM * VISUALIZARON DE LOS CARACTERS ASCII * 

30 REM * DEL 32 AL 255 * 

40 rem 

50 REM 

60 FOR 1-32 TO 255 
70 PRINT I ; CHRf(I) 

80 NEXT I 
90 END 

Como puede verse dicho programa, 
cuando queramos imprimir un carácter del 
cual sólo conocemos su CODIGO ASCII, utili- 
zaremos la función del BASIC: 

PRINT CHR$(n) 

donde n es el CODIGO ASCII de dicho carác- 
ter. 

Hay otra función en BASIC que hace lo 
contrario. O sea, si conocemos el carácter, nos 
da su CODIGO ASCII. 

LET A = ASCC'A") o PRINT ASC(“A 0 ) 

Esta instrucción nos devolvería en A el 
número 65, que es el código ASCII de la letra 
A. Se puede ver que la letra ha de ir entre co- 
millas. Si el carácter a comprobar estuviese al- 
macenado en una variable alfanumérica la sin- 
taxis sería: 

LET A=ASC(B$) o PRINT ASC(B$) 

sin poner la variable entre comillas. Si la va- 
riable alfanumérica constase de más de un ca- 
rácter, la función ASC nos da el código del pri- 
mer carácter de la cadena, 

LET B$="HOLA": PRINT ASC(B$) 

el ordenador imprimirá un 72, que es el códi- 
go ASCII de la letra 'H\ 

El programa 8 nos pide un mensaje y 
nos da el código ASCII de todas las letras de 
dicho mensaje. 

10 REP1 ************************************** 

20 REM * IMPRIMENLOS CODIGOS ASCII DE TODOS * 

30 REM * LOS CARACTERES DE UN MENSAJE * 

40 REM ***MM****2U**MMM*m***MM****** 

50 REM 

60 INPUT "MENSAJE = M jM* 

70 FOR 1=1 TO LENtM*) 

SO PRINT ASCÍMIDf <M*, I, 1) S 
90 PRINT ,J ES EL CODIGO ASCII DE LA 11 1 
100 PRINT MID* (M*, I, 1) 

110 NEXT I 
120 END 

■ Caracteres de control 

Un poco más arriba hemos comentado 
que de los 256 caracteres que tiene nuestro or- 


denador, los 32 primeros son CARACTERES 
DE CONTROL. ¿Qué significa esto? 

Hay una serie de funciones en nuestro 
ordenador que, aunque a nosotros no nos lo 
parezca, son caracteres. Entre ellos se en- 
cuentran las funciones de: 

— Borrar pantalla. 

— Mover los cursores. 

— Hacer que suene un ruidito. 

— DELETE (borrar el carácter que 
está a la izquierda del cursor). 

— INSERT (insertar una letra o más en- 
tre dos que están juntas), 

— Saltar de línea, 
etcétera. 

El carácter < borrar pantalla > (CHR$ 
(12)) tiene el mismo efecto que el comando 
CLS. En último extremo, CLS es un PRINT 
CHR$(12). Pruébalo. 

El carácter que hace un ruidito es el nú- 
mero ocho (CHR$(7)) y hace lo mismo que el 
comando BEEP. Prueba a escribir PRINT 
CHR$(7). 

Otro carácter de control es el trece 
(CHR$(13)), que hace que el cursor baje al 
principio de la línea siguiente. A este carác- 
ter se le llama RETORNO DE CARRO, por su 
parecido a lo que hace una máquina de escri- 
bir. Este carácter es el que lee el ordenador 
cuando pulsamos la tecla RETURN o ENTER 
(según qué ordenador), 

Los caracteres de control suelen variar 
mucho de unos ordenadores a otros. Por ello, 
te recomendamos que mires tu Manual para 
poder conocer cuáles son los que tienes y qué 
efecto hacen. De todas maneras, aquí se inclu- 
ye un cuadro con los caracteres de control 
más comunes y sus códigos ASCII (ver figu- 
ra 9). 


I Almacenamiento de caracteres 


Lógicamente el ordenador tiene que te- 
ner almacenados en algún lugar de su memo- 



1234 567 8 



UN BIT = 
8 BITS 


fíg. S. 
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ría todos los caracteres. Pero tiene que guar- 
dar no sólo el número, sino también la forma, 
Para ello utiliza, por así decirlo, un papel cua- 
driculado en el que dibujará cada uno de los 
caracteres. 

Como todos sabemos, la unidad más pe- 
queña de información que puede tratar el or- 
denador es el BIT (Binary diglT). En los mi- 
croordenadores que se comercializan estos 
BITs se agrupan de ocho en ocho formando lo 
que se llama BYTE (ver fig. 5). Si ponemos 
unos BYTES encima de otros y nos imagina- 
mos que cada BYTE está formado por ocho 
cuadraditos, esto nos dará la rejilla que utiliza 
el ordenador para almacenar los caracteres 
(ver fig. 6). 



«-BYTE 

♦-BYTE 


‘-BYTE 


Fig. 6. 

Si cada cuadradito fuese una bombilla, 
ésta podría estar de dos maneras; encendida 
o apagada. Si decimos que cada cuadradito es 
un dígito, éste puede tomar el valor cero (apa- 
gado) o uno (encendido), Cuando juntamos 
ocho BITs, formado un BYTE, cualquiera de 
ellos puede tomar el valor cero o el uno. Por 
ejemplo, un grupo de ocho BITs podría ser; 

10010111 

Que da la casualidad que es un número 
en base dos. Este número en base diez sería 
el 151. 

Después de esto podemos decir que el 
ordenador sólo puede trabajar con números 
que estén en base dos y que no excedan de 
ocho dígitos, con lo que todo este razonamien- 
to se esclarece. 

Según esto, para almacenar la forma 
que tiene la letra A, el ordenador utiliza ocho 
BYTES (no BITs) uno encima de otro y encien- 
de (pone a uno) los dígitos que dan la forma 
de la A (ver figs. 7 y 8). 

Si quieres ver cómo están definidos los 
caracteres que tiene el AMSTRAD fíjate en la 
figura 9. 

Ya sabemos cómo almacena el ordena- 
dor una letra, pero ¿cómo almacena el grupo 
entero de letras? El primer carácter que tiene 



Fig. 7. 


0 0 0 1 110 0 
0 O 1 0 0 0 1 o 

0 0 1 0 0 0 1 0 

0 0 1 0 0 0 1 0 

0 0 111110 
00100010 
0 0 1 O 0 0 1 o 

00000000 

Fig. a. 

almacenado es el carácter 32 (el espacio), que 
se compone de ocho líneas de ocho ceros. 
A continuación va el carácter 33 (!) después el 
34 (“) y así hasta llegar al carácter 255. 

Como vimos en el programa 7, de los 
256 caracteres algunos son letras, números y 
caracteres de puntuación, pero hay muchos 
que son extraños y desconocidos. Este grupo 
suele incluir algunos caracteres griegos, pero 
los que a nosotros nos importan son los carac- 
teres SEMIGRAFICOS. Estos caracteres son lí- 
neas verticales y horizontales, esquinas, cua- 
drados, triángulos, etc, 

Con los caracteres semigráficos pode- 
mos, en cierta manera, dibujar cuadrados y 
otras cosas para hacer más bonitos nuestros 
programas. Un ejemplo lo podéis ver en los 
programas 9 y 10. 

Si quieres pasar este programa a tu or- 
denador ten en cuenta que los caracteres y su 
código ASCII que se utilizan son los siguientes 
(ver fig. 10); 

Para conocer mejor los caracteres se- 
migráficos os recomiendo que practiquéis con 
ellos e intentéis introducirlos en vuestros pro- 
gramas. 

Los ordenadores servirían de poco si no 
nos permitiesen definir nuestros propios ca- 
racteres, Con los caracteres que nosotros nos 
definamos podemos hacer juegos de marcia- 
nitos, escribir con letras que tengan acento, 
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10 REM **************************************** 
20 REM * CUADRADO CON CARACTERES SEMI GRAFICOS 4 
30 REM * PARA EL CÜMMOOORE t 

40 REM ** * 4 * * * * * ** 4* * #4 * *# * ** * 44 ** *#* * 4# t 44 4** t 

SO REM 

40 PRINT M <SHIFT-HQM£>" 

70 PRINT CHRf í L 74) ; 

80 FDR I-i TO 10 
90 PRINT CHRf<99>; 

100 NEXT I 

110 PRINT CHRf ( 1 74) 

120 POR 1-1 TC 10 

130 PRINT CHRf (98) % IH "-CHRÍÍ9RÍ 

140 NEXT I 

150 PRINT CHRf (173) ; 

1Ó0 POR 1=1 TO 10 
170 PRINT CHRf (99) $ 

100 NEXT I 

190 PRINT CHRf í 1 09 ) ; 

200 END 


10 REM **************************************** 

20 REM * CUADRADO CON CARACTERES SEMGRAFICOS * 
30 REM * PARA EL IBM * 

40 REM **************************************** 

50 REM 

60 CLS 

70 PRINT CHRf (201 ) ; 

00 FOR 1=1 TO 10 
90 PRINT CHRf (205); 

1O0 NEXT I 
UO PRINT CHRf (187) 

120 FÜR 1=1 TO 10 


130 PRINT 

i A n, hlITVT T 

CHRf (186); " 




11 

; CHRf 

< 186) 

150 F 

>RINT CHRf (200); 











160 for 1=1 ro iO 


170 PRINT 

CHRf (205) s 

180 NEXT I 




190 PRINT ' 

CHRf í 18B) 


200 END 





escribir en griego o en árabe, hacer que las le- 
tras de nuestro ordenador se parezcan a las 
que se utilizan en las películas del Oeste o in- 
cluso escribir en un alfabeto inventado por no- 
sotros. 

Para cambiar los caracteres que tiene 
el ordenador sólo tendremos que poner en la 
zona de la memoria donde éstos se almacenan 
la configuración de nuestro propio juego de 
caracteres. Antes de explicar cómo hacerlo 
necesitamos saber algunas cosas, 

En la memoria del ordenador sólo hay 
números, Números que, aunque nosotros no 
entendamos lo que significan, el ordenador sí 
entiende. 

Por otra parte, la memoria del ordena- 
dor está dividida en dos partes: la ROM (me- 
moria de sólo lectura) y la RAM (memoria de 
lectura y escritura). 

En la ROM no podemos escribir, pero 
podemos mirar lo que ya está escrito, En la 
RAM podemos escribir lo que queramos y mi- 
rar lo que ya está escrito. 

Pero ¿cómo mirar lo que hay en una po- 
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r 


= 176 


n 


= 174 


= 99 


-98 


L 


= 173 


j 


= 187 


CARACTERES USADOS EN EL 
PROGRAMA 9 



Fig 1 Q- Fijate en estos caracteres y búscalos en el codigo ASCII de tu ordenador Cuan- 
do los encuentres sustituye los números en e! programa 10, 


sición de memoria? Para hacerlo se utiliza un 
comando del BASIC, el comando PEEK, Este 
nos devuelve el número que hay escrito en 
una posición de memoria. Su sintaxis es: 

PEEK (p) 

donde ’p' es la posición de memoria que que- 
remos leer. Para ver un ejemplo ejecuta el 
programa 11. 


10 REM *************.* ****** ********* 

20 REM * PROGRAMA RARA VER QUE HAY * 

30 REM * DENTRO DÉ LA MEMORIA * 

40 REM ****** ************ *********** 

50 REM 

60 INPUT "POSICION DE MEMORIA INICIAL ";N1 
70 INFUT “POSICION DE MEMORIA FINAL " $ N2 
30 FOR I -NI TO N2 

90 PRINT "DIRECCION - " ? 1 , 11 VALOR =";PEEKU) 
ICO NEXT I 
110 END 


La forma de escribir en una posición de 
memoria es con el comando POKE, cuya sin- 
taxis es: 

POKE p.n 

donde 'p' es la posición de memoria donde 
queremos escribir y 'n' el valor que queremos 
escribir, El valor de 'n' tiene que estar com- 
prendido entre O y 255, ya que el ordenador 
no entiende números mayores que 255 ni me- 
nores que 0. Aunque esto último te parezca 
mentira, es verdad. Cuando tú le dices al or- 
denador: 

PRINT 12000 

el ordenador te imprime 12000, y 12000 es ma- 
yor que 255. La verdad que el ordenador rea- 
liza una serie de trucos antes de imprimir di- 
cho número, lo cual no significa que pueda al- 
macenarlo en un solo BYTE. 


A la hora de utilizar el comando POKE 
tienes que tener mucho cuidado, pues puedes 
meter valores en zonas de la memoria reser- 
vadas para uso del ordenador, En estas zonas 
el ordenador almacena ciertos datos como la 
hora, el día o la memoria libre. Si tú tocas es- 
tas zonas de memoria el ordenador se puede 
volver loco, pero no te preocupes, si lo apagas 
y lo vuelves a encender se volverá normal otra 
vez. 

Te aconsejo que practiques con estos 
dos últimos comandos para acostumbrarte a 
ellos. 

Ahora ya estamos en condiciones de 
definir nuestros propios caracteres gráficos. 
Antes de ponernos delante del ordenador, te- 
nemos que saber qué nuevos caracteres que- 
remos realizar. Para ello cogemos un lápiz y 
un papel cuadriculado y dibujamos en el pa- 
pel, cuadrado a cuadrado, el nuevo carácter. 
No se te olvide que tiene que tener 8 puntos 
de alto y otros ocho de ancho (8 x 8 = 64 cua- 
dradlos). 

Una vez dibujado nuestro carácter co- 
gemos cada fila y la escribimos como una tira 
de unos y ceros, A continuación pasamos di- 
cho número, que está en base dos, a base diez 
y continuamos con la siguiente línea hasta lle- 
gar a la octava. 

Cuando terminemos tenemos que tener 
ocho números en base diez. Pero ¿qué hace- 
mos con estos ocho números? En el fascículo 
siguiente veremos cómo almacenarlos y cómo 
hacer cosas con ellos. 

A continuación tenemos un juego gráfi- 
co para que veas lo que podrás hacer con el 
tiempo tú y el ordenador. Esto será cuando ha- 
yas aprendido lo suficiente, que será muy 
pronto (ver fígs. 11 y 12). 
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Fig. 12.— Con el tiempo podrás realizar programas con 
unos gráficos tan bonitos como estos e incluso mejores. 



PROGRAMA JUEGO- 1 


10 REM ************************ 

20 REM * JUEGO DE MARO I AMITOS * 
30 REM *** 

40 REM 
50 REM 


Ediciones Siglo Cultural 
Feo. Morales Guerrero. 


INIGIALI 2 ACION DEL 


JUEGO *** 


LET SM=Ü 
NUMERO DE VIDAS 
LOS PUNTOS 
NUESTRA NAVE 


TRES TIPOS DE NAVES 
ENEMIGOS No. 1 
ENEMIFQS No, 2 


ENEMIGAS 


DISTINTAS 


REM 

REM 


ENEMIGOS No 


NUESTRO LASER 
Ei LASER DE LOS ENEMIGOS 
TECHO DEL REFUGIO 
CUERPO DEL REFUGIO 


*** EMPIEZA EL PROGRAMA *** 


INSTRUCCIONES 


260 REM 
270 REM 
260 CLS 
790 PRINT 
300 PRINT 


*** DIBUJO DE 


PANTALLA #** 


PUNTOS 


VIDAS 


310 por r 
320 PRINT 
330 PRINT 
340 PRINT 


L" : NEX7 I 


350 PRINT 


*** PROGRAMA PRINCIPAL *** 


390 LOCATE 20,15:PRINT 
400 L ET NE - 1 NT í RND *3+ 1 1 
Yl^VE 

410 GOSUB 500 
420 GOSUB 910: GOSUB ltrOúi GOSUB 1 i 00 


INI íRND*l7) +3: LET Xi 


LET XE~ tNT (PND*2B > +2: L ET YE 


430 IF SA=J THEN LET SA-O: GOSUB 
440 TF SM=l THEN LET SM-O: GOSUB 
450 GOTO 410 


670 

800 1 GOTO 
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470 rfm 

/i Dí-t de-u ib rn.i r\n n irrín * 
























i— t ■ — ■ ■> ■ n FT 1 - ■ A w— 1 I . 
















490 REM ***************** 




























500 REM 

5 JO PRINT " 












»■ 




































520 PRINT " 

***************************** 

* " 
* " 
* " 






















53Q PRINT 11 
540 PRINT " 

* 

f 



1- íiN UtL OUtUU 

VIDAS ASOTADAS 
























550 PRINT " 
560 LOCATE 
570 REM 

****************** 

r>i t*cun 

************ '■ 























i i- ■r 








!*# 
























500 REM »** 
770 REM 

MOVIMIENTO 

DEL t 

ENEMIGO 1 
























600 1F RND> 
610 LOCATE 
620 LET XE = 

,8 

Yl, 

XE 

AND SE-0 
X 1 : PRINT 
(RND>,5 

THEN LET SE=3 
' “ " : LOCATE 
AND RND>.5) + i> 

s RETURN 

YE, XE ! PRIN" 
¡E=2S) 

r Ef í NE) : 

LET X 

1 -XE : l 

.ET 

VI 

-YE 











630 LET XF- 
640 LET YE“ 

XE+ ÍRND> 
YE- iRND> 

, 5 
.5 

AND RND ' 
AND RND< 

.5) - ( XE=?í 
, 5) + ÍYE=17> 























650 LET YE= 
660 RETURN 
670 REM 

Y£* 

( RND í 

.5 

AND RND > 

. 5) 

— (YE=3) 
























































6R0 RFM *?* 
690 RFM 

ESTALLIDO 

DE 

LA 

NAVE 

tti 

c 
























7^0 r 7P W-I 

TC 

1 3 





< = 

< 

























70, 

20 ? 

,XN 

, XN 



■ ■ 

■j ii 












f ULBIÍ' 

720 LOCATE 

s rn Ji IV | 

¡PRTNT " 

> í 

>”í 

IjUtiUtl 

GOSUP 

i ¿ÜU 

1260 






















730 LOCATE 

“)jtA i nrATC 

70, 

20, 

, XN 
, XN 

¡PRINT " 

: PRINT 11 

<- 

O 

V'I * 

* 

II « 

SOSUP 

GOSUB 

1260 

1260 






















750 NFXT UJ 


m 






















760 i nrATF 

770 LET XN= 

70, 

15; 

VN: PRINT M 
LOCATE 70, > 

i 

:ns( 

II 

-■R!NT 

NS 

























7R0 LFT V-V 
790 RETURN 
E00 RFM 

-l i 

GOSUE 

1710 












































































FX* Rf^ *** 

R20 REM 

FPTñi 

_L IDO 

DE 

LA 

NAVE 

ENEMIGA 

**J» 

[ 





















9T0 ^OR W=í 

TC 

1 3 

YE, 

YE, 

XF 

,XE 








12 

126 

J #^4 






















'J4U ! ! t 

B50 LOCATE 

: rn i i-j i 

¡PRIN1 

1 i i^r. > : 

' G 

laUíjU» 

¡05UB 

oO 

0 






















960 NEXT W 
P7o i nroTr 

Vr ? 

vi, 

xn 

XI : 

PRTNT 

IH 

I 



























r~¿ f v I,lL Ilr Fi r ¡t - 

REO LOCATE 

090 • ET PN- 
900 RF T URN 

: PRINT 

P1 

l 

PP 










































PN + 30* NE 

: GOSUB 1 230 


























9in PEI* 

o "O *** 

930 REM 

CONTf 

?0L 

nn Ten Ann 

■ Mfun mt rjviTr 

í DI 

7 1 /V KIAU1 

r +• é -k 












































940 REM 

950 AÍüINKEYÍí 

IF 

AS 

— u 11 

THEN 

RETURN 

























960 IF A*-= H 
970 IF AÍ~ M 
990 IF 

cr 

p“ 

THEN LEI 
THEN LEI 

AND SW=C 

XN=XN-I-<XN=2) ¡LOCATE 
' XN-XN+ 1 + í XN-27) : LOCATE : 
> THEN LFT SW- 1 s RETURN 

XNi PRINT 
?0, XNs PRINT 

N$; 

m 

RETURN 
í RETURN 













990 RETURN 
100O REM 


































K'IO RFM t* 

1070 REM 
1070 TF SW- 

* DISPARO * 

;** 





























0 THB 

\ RETURN 





























í 04 O t F swsi THEÍ 
1050 LOCATE COI. 
1060 IF ÍXD • XF-1 

4 LET XD Z 
vn- 

XN 
r » 

+ 2; 
n * 

LET COIS; LET 

i nrfiTr rr vn.c 

SW=- 1 

>PTMT 




















AND X 

DO 

a* 

CF+3> 

AND fCC=YE> 

AJ u 1 I % A P 

thefj 

LET SF1= 

i : 8EEP 































1 r >70 LET C C 

1 ORO if nc- 

=i.l, - 1 

7 T HFf 

! LFT 

SW- 

Oí i 

l-QGATIF 

: cc+i 

, XD 

íRRIN' 

T É1 

i» 



















1090 RETUR N 
1 100 REM 
"lio RFM ** 

: 









i 






















* l 

DEPARO t 

EL 

ENEMIGO 

*.* + 























1 170 RFM 

J ! 70 IF sr- 

0 THFfr 

4 RFTURN 





























1140 IF RE- 

1 THEN LET 

XR=XE 

; 

LET CI 

>=YE + 1 

: LET 1 

BE= 

-1 

LE’ 
: I F 














?- I T XR 
THEN 



r ■■ 

ii _ 






V*¡ 

n pi 







3 1 .J l ’ L ¡ Jil .r-‘t 1 EL 

1160 IF rü- 

U ¡V 
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: r r, 1 1-1 1 

LET SE 


; LULR 1 t UJ 

¡LOCATE CD- 

J ■ | AFXrrPCiLiNI 

UXRsPRINT 

1 UU=LU+J 

“ Xft>XN f 

1ND 

XRÍXN+4 

THEN 

L 








FT 5ñ=í 

1 1 7n ESC-TI IEvKÜ 
































T IBO RFM 





DF 




























1 190 RFM , m MARCADOR 

1700 REM 

PUNTOS * 

:** 

























1710 ! ACATÉ 
1770 RETURN 
1770 RFM 

I * 

1 

11 : 

; PRINT 

' v¡ 

IF 

v- 

0 THEf 

4 GOTO 

510 





















1 








f 

























i n^ATf 

j fm~r l ' i uv.M i L_ 

1750 REM 
1260 REM ** 
1770 RFM 
1200 FOR ns 

* 

4, * 

n. . PrP, I kPT 
r i 1 r 1 1 t 1 J 

IT-^P - 
■ 1*. 

nrTi iri 
a *h L. j fc_íi \ 

M 
• * 


























* RETARDO * 

:** 




























i=l 

TO 

100 ¡NEXT Gl 

E: RETURN 
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1290 REM 

1300 REN ***************** 

1310 REM * INSTRUCCIONES * 

1320 RFM ***************** 

1330 RFN 
1340 CLS 

1350 F'RTNT " * * * ATAGUÉ LUNAR #* * " : PRINT 
3 360 PPINT 11 Por Feo, Morales Guerrero * " i PRINT 

1370 PRINT " I NSTRUCC1 ONES " : PR I NT " — — i PRINT 

1380 PPINT “ Eres el comandante de las tres" 

1390 PRINT "ultima? naves del universo» 11 
1400 PRINT ,f Los extraterrestres han con-' 1 
3410 PRINT "quistado todo el universo- Todos 1 * 

1420 PRINT "los hombres están esclavizados*" 

3 430 PRINT 1f Tu deber es matar a todos los" 

1 440 orint "extraterrestres antes de que " 

J450 PRINT "ellos t P maten a ti*" ¡PRINT 
3 460 PRINT hP Para ello dispones de un po-" 

1470 PRINT lp tente láser de tecnología japo-" 

1490 PRINT "rtesa. " i PRINT ¡ PRINT 

1490 PPINT "PULSA UNA TECLA" i GOSUB 1640 

1500 CLS 

!5t0 PRINT "Tu nave es : m i PRINT 

1520 PRINT "las de tus enemigos son: "¡PRINT 
1530 PRINT E*m; ,p ";E*<2l; pp 11 s E* (31 1 PRINT 
1540 PRINT "Los bunker? protectores son s **5 PRINT 
1550 PRINT Rí: PPINT s* : PRINT 

1560 PRINT "Utiliza las si dientes t bc 1 as" t PRINT 
1570 PRINT "Q = izquierda" 

1590 PRINT "N " derecha" 

*590 PRIN T "P = disparo" :PRINT 
1600 PPINT 11 DUE TENGAS SUERTE M t 1p s PRINT 
1610 PPINT 11 PULSA UNA TECLA" : GQSUB 1640 
1620 RETLIRN 
1630 PEM 

1640 PEM ******************* 

1650 REM * PULSA UNA TECLA * 
í 660 REM ******************* 

1670 REM 

1690 LET A*=!NKEY*! IF A*="" THEN GOTO 1680 
1670 RETURN 


MANEJO DE SPRITES Y ELEMENTOS GRAFICOS MODIFICACIONES DEL 

Commodore 

PROGRAMA JUEGO-l 

- En las líneas 280, 1340 y 1500, 

parámetros de la sentencia 

sustituir el CLS por: PRINT 

LOCATE van al contrario, Si 

"<SHIFT'HOME>" 

ves que pone: LOCATE 20.XN, 

- Quitar el BEEP de la línea 

tendrás que poner LOCATE 

1060. 

XN,20. 

- En las líneas donde ponga LET 

Spectrum 

A$=INKEY$ sustituirlo por: 

- Cambiar la línea 130 por DIM 

GET A$. 

E|(3,3). 

Amstrad 

- Recuerda que el SPECTRUM 

- En todos los lugares donde 

no tiene lócate, Sustitúyelo por 

ponga RND, sustituirlo por: 

PRINT AT. 

RND(l). 

- Cambia el BEEP de la línea 

MSX 

1060 por BEEP 15,0.5. 

- Donde ponga RND, sustituirlo 

IBM 

por: RND(l). 

- No hace falta realizar ningún 

- Recuerda que en el MSX los 

cambio, 
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TRUCOS Y RUTINAS BASICAS 


Simulación de 
la sentencia 'LOCATE' 
en el Commodore 

L COMMODORE es uno de 
los primeros microordena- 
dores que aparecieron en el 
mercado. Debido a esto, ca- 
rece de muchos de los co- 
mandos y funciones que hoy 
en día son normales en to- 
dos los ordenadores. Tal es 
el caso de la sentencia 'LOCATE'. Esta senten- 
cia nos permite colocar el cursor en cualquier 
.ugar de la pantalla o, lo que es igual, nos per- 
mite escribir en cualquier parte de la pantalla. 

Con la rutina que proponemos a conti- 
nuación este problema se resuelve de una ma- 
nera rápida y eficaz. 



El COMMODORE permite al usuario un 
cierto control sobre el cursor, así como borrar 
la pantalla y colocar el cursor en la posición 
de 'HOME' (esquina superior izquierda). 

Si en uno de nuestros programas que- 
remos borrar la pantalla hacemos lo siguiente: 

1 . Escribir PRINT" 

2. Pulsar la tecla SHIFT y sin soltarla pul- 
sar la tecla HOME, 

3. Cerrar comillas. 

Haciendo todo esto nos aparecerá entre 
las dos comillas un cuadradíto con un corazón 


?950 REM **************************************************** 


9951 REM * * 

9952 REM * RUTINA J LOCATE" PARA COMMODORE * 

9953 REM * * 

9954 REM ****** ** *4 *** *4 *4 i** ** ** ********** * * ** ** *********** * 

9955 REM * VARIABLES QUE SON NECESARIAS PASARLE A LA RUTINA * 

9956 REM * — * 

9957 REM * X = COLUMNA DONDE NOS QUEREMOS PQSICIONAR * 

995S REM * V = PILA DONDE NOS QUEREMOS FDBICIÜNAR * 

9959 REM * * 

9960 REM * LA RUTINA NO DEVUELVE VALORES * 

9961 REM * * 

9962 REM * VARIABLES QUE SE USAN INTERNAMENTE * 

9963 REM * * 

9964 REM * CC = CONTADOR DE BUCLES * 


9965 REM **************************************************** 

9966 REM 

9967 PRINT ,í <HOME>”í 

9968 FOR CC=1 TO X 

9969 PRINT “LCURSÜR DERECHA > 11 ; 

9970 NEXT CC 

9971 FOR CC-1 TO V 

9972 PRINT "< CURSOR ABAJO"; 

9973 NEXT CC 

9974 RETURN 


Esta rutina simula perfectamente la sen- dibujado. Este signo le dice ai COMMODORE 
tencia LOCATE 1 y, para realizarla, nos basa- que borre la pantalla. Si pulsamos RETURN el 
remos en lo siguiente- COMMODORE lo hará así. 
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Si en vez de pulsar las teclas SHIFT y 
HOME hubiésemos pulsado las del cursor, en- 
tonces nos hubiese aparecido otro carácter 


CHA> pulsaremos la tecla que tiene un dibu- 
jo con una ñecha hacia la derecha. 

Para utilizar esta rutina, hay que decir- 



<SHIFT-HOME>LS 


= 



= CCURSOR DERECHA.: - 



= < CURSOR ABAJO > 


= 


Fig i —Así aparecen en la pantalla del Commodore ios caracteres que hacen que se mueva el cursor al ponerlos entre las 
comillas de un pnnt. 


que el COMMODORE interpretaría como: 
'MUEVE EL CURSOR HACIA la dirección que 
hayamos indicado’. 

El programa que proponemos como 
sustituto de la sentencia 'LOCATE' hace lo 
siguiente: 

1. Coloca el cursor en la posición 

HOME. 

2. Mueve el cursor tantas veces a la 
derecha como hayamos indicado (se mueve a 
la columna X). 

3. Mueve el cursor tantas veces hacia 
abajo como hayamos indicado (se mueve a la 
fila Y). 


lo REM **««t***tt***t***t*t****f ******** 

20 REM * PROGRAMA EJEMPLO RARA UTLIIAR * 
30 REM * LA RUTINA 1.1 * 

40 REM ***** ********************* ******* 

SO REM 

hO PRINT "<SHÍFT-HOME>” 

70 INPUT '*En que columna me coloco 11 5 X 
80 INF'UT 11 V en que fil* “ 5 Y 

90 PRINT 11 <SHI FICHOME >“ 

100 PRINT “Me voy a colocar en J a columna 
" 5 X 5 " de la fila «jV 
UO Í30SUB 9950 
120 PRINT "AQUI ESTOY*' 

130 END 


4. Deja el cursor en dicha posición en 
espera de que imprimamos algo. 

Sabiendo esto, ya podemos interpretar 
el listado. Por esto, a la hora de introducir el 
programa en nuestro ordenador, donde pone 
<HOME> tendremos que pulsar la tecla 
'HOME', y donde pone cCURSOR DERE- 


le la columna a la que nos queremos mover po- 
niendo su número en la variable X y la fila en 
la variable Y. Seguidamente haremos un GO- 
SUB 9950. 




ME VOY A COLOCAR EN LA 
COLUMNA, 5 DE LA FILA 10 

1 

1 

1 

i 

i 


_¡ AQUI ESTOY 



Fig 2— Con esta rutina podremos simular el comando LOCATE 
en el Commodore, 

Subrutina 

de entrada de datos 
de propósito general 

En casi todos los programas que se rea- 
lizan hoy en día es necesario que el usuario in- 
troduzca datos al ordenador: como su nombre, 
la fecha o cualquier otro dato que el ordena- 
dor desconozca y necesite para ejecutar el 
programa. 

La rutina que damos a continuación es 
un procedimiento de entrada de datos de pro- 
pósito general y que nos permitirá, al incluirla 
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en nuestros programas, pedirle al usuario 
cualquier dato que necesitemos para la ejecu- 
ción del programa. 



NOMBRE: 

1. " APELLIDO: 

2. « APELLIDO: 

TELEFONO; 

DIRECCION: N.° 

PROVINCIA: 

PAIS: 

k 

F:g 3 — Casi todos ios programas comerciales utilizan una ru 
una para introducir datos parecida a ésta 



Esta rutina está localizada a partir de la 
línea 9900 para que no se pueda confundir con 
el programa general. Con esto nuestros pro- 
gramas serán más modulares y estarán mejor 
estructurados. 

La petición de datos podemos hacerla 
en cualquier parte de la pantalla. Con solo dar 
valores a las variables X e Y, éstas le dirán a 
la rutina en qué columna y en qué fila se co- 
locará el cursor y empezará la recogida de 
datos. 

El número máximo de caracteres que el 
usuario podrá introducir, para dar el dato que 
se le pide, vendrá dado por el programa, y se 
almacenará en la variable LO. Esta variable 
puede tomar cualquier valor siempre que no 
exceda de la longitud de una línea. La rutina 
detecta automáticamente si se ha llegado al 
número máximo de caracteres permitidos, 

El usuario no tendrá por qué introducir, 
lógicamente, tantos caracteres como número 
máximo hayamos descrito. 

También se puede restringir el tipo de 
caracteres que se pueden introducir. Así, por 
ejemplo, podemos hacer que sólo se acepten 
las mayúsculas, sólo las minúsculas, los núme- 
ros, todas las letras o todos los caracteres. Para 
realizar esta función se necesitan dos va- 
riables, 

W$ - Nos dice el primer carácter permitido 
M$ - Nos dice el último carácter permitido 

Por ejemplo, si queremos que la rutina 
sólo acepte las letras mayúsculas desde la A a 
la Z pondremos en nuestro programa: 

LET W$ = “A” 

LET M$ = "Z” 


La rutina está preparada para admitir 
en cualquier momento los carácter espacio en 
blanco ( ), punto (.) y guión (-). 

Cuando la rutina retorne, bien porque 
el usuario pulse RETURN o bien porque agotó 
el número máximo de caracteres disponible 
para definir dicho dato, el resultado estará al- 
macenado en la variable alfanuménca D$. 

El funcionamiento del programa línea a 
línea es el siguiente: 

Las líneas incluidas entre la 9900 y la 
9921 son una breve descripción del funciona- 
miento del programa y de las variables usa- 
das: internas y de uso propio de la rutina y ex- 
ternas o variables que se le pasan a la rutina. 
Este grupo de líneas lo podemos quitar, una 
vez introducido el programa y entendido su 
funcionamiento, para así ahorrar memoria. 

La línea 9922 inicializa la variable alfa- 
numérica D$ y la numérica LO. LO será el con- 
tador interno de los caracteres introducidos 
hasta un cierto momento por el usuario. 

La línea 9923 coloca el cursor en la co- 
lumna X de la fila Y. En el SPECTRUM hay que 
cambiar la sentencia LOCATE Y,X por PR1NT 
AT Y, X. Para usar este programa en el COM- 
MODORE, donde ponga LOCATE poner GO- 
SUB 9950 e introducir la rutina para el COM- 
MODORE que se ha dado anteriormente. En 
otros ordenadores, como el MSX, los argumen- 
tos de la sentencia LOCATE van al contrario, 
con lo que si vemos LOCATE Y.X, los dueños 
de dichos ordenadores tendrán que poner LO- 
CATE X,Y. 

Las líneas 9924, 9925 y 9926 imprimen 
en la pantalla tantos puntos (.} como caracte- 
res le está permitido escribir al usuario. Esto 
se ha hecho de esta manera para que el usua- 
rio sepa hasta dónde puede escribir, pero se 
ouede quitar o sustituir por cuadrados de co- 
iores, líneas, etc. 

A partir de este momento se empieza la 
rutina de verdad. Se mira si se ha pulsado una 
tecla y se estudia el carácter tecleado para 
ver si está dentro de los límites permitidos. 

La tecla DELETE sirve para borrar el 
carácter que está a la izquierda del cursor y 
mover el cursor un lugar hacia la izquierda. 
En la línea 9932 se pregunta si se ha pulsado 
esta tecla y alguna otra con anterioridad. En 
caso afirmativo, el contador de caracteres in- 
terno disminuye en uno, a la variable D$ se le 
quita el último carácter introducido (el que 
está más a la derecha, D$ = left$ (D$,LO) ) y 
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Fig 4 — Con esta rutina ya fe puedes olvidar de Ja incomodidad 
del ÍNPUT. 


ESTA RUTINA PERMITE LA ENTRADA DE 
DATOS DE UNA FORMA MAS ELEGANTE Y 
PRACTICA QUE SI SE HUBIESE HECHO CON 
UN INPUT 


CUANDO NECESITES PEDIR UN 
NUMERO , M$ SERA IGUAL A 
"9" Y W$ A “0”. COMO EL 
RESULTADO VENDRA EN D$, 
PARA RECUPERARLO EN FORMA 
NUMERICA PONDREMOS: 

LET NU = VAL (D$) 


se coloca el cursor un lugar más a la izquier- 
da que el que ocupaba antes. 

En la línea siguiente (la 9933) se pre- 
gunta si se ha pulsado espacio ( ), un punto 
(.) o un guión (-) para, en caso afirmativo, man- 
dar el control del programa a la línea 9936 
para imprimir lo pulsado. 

Si se ha pulsado RETURN o ENTER o 
NEWLINE o INTRO (línea 9934) se hace GOTO 
a la línea 9942 para terminar y devolver el con- 
trol al programa principal, 

En la línea 9935 se comprueba si la te- 
cla pulsada está dentro del rango de las per- 
mitidas y, si no lo está, se vuelve a la línea 
9930. 

A partir de este punto se imprime la te- 
cla pulsada (9936), se suma uno a la posición 
en X del cursor (9937), se coloca el cursor en 
lugar hacia la derecha (9938), se concatena D$ 
con A$ para almacenar la tecla pulsada (9939) 
y se incrementa en uno el contador de carac- 
teres introducidos (9940), 

Si el número de caracteres introducidos 
es distinto del número máximo de caracteres 
permitidos se repite la operación para captar 
otro carácter (línea 9941). En caso contrario, se 
borran los puntos sobrantes a la derecha 
(9942) y se devuelve el control al programa 
principal. 

Hay que advertir que como el SPEC- 
TRUM no tiene la función LEFT$, en la línea 
9932, donde aparece esta función, habrá que 
poner: LET D$ = D$(TO LO). 


9900 rem 

9901 REM t <<« RUTINA DE ENTRADA DE DATOS >>>> 

9902 REM * VALIDA PARA MSX, IBM, AM8TRAD, SPECTRUM 





9903 REM 

9904 REM 

* Y COMI MO DO RE * 














9905 REM 

9906 REM 

9907 REM 

* 

* 

VARIABLES QUE SON NECESARIAS PASARLE A 

LA 

RUTINA * 














* 

* 

X 

* COLUMNA DONDE SE EMPIEZA 

A IMPRIMIR 



— *■ 

* 














990B REM 
9909 REM 

* 

* 

Y 

LO 

■ FILA DONDE SE EMPIEZA A IMPRIMIR 
* LONGITUD MAXIMA DEL DATO 





* 

* 














9910 REM 

* 

M* 

W* 

= MAXIMO CARACTER PERMITIDO 







* 














9911 REM 

9912 REM 

* 

* 

“ niNiriU LftKHLÍtH FtKníílüü 








* 

* 














9913 REM 

9914 REM 

* 

t 

* 

EL 

DATO INTRODUCIDO SERA 

DEVUELTC 

E^ 

4 D* 




* 

t 














9915 REM 

VARIABLES USADAS INTERNAMENTE 








* 














9916 REM 

* 

— 









* 











9917 REM * LO = CONTADOR DE CARACTERES INTRODUCIDOS 
99 IS REM * CC = CONTADOR DE BUCLES 

9919 REM * A* » RECOGE ÉL CARACTER TECLEADO 

9920 rem tmmmttutimmmimmmmitmtitiiiM 

9923 REM 

9922 LET D*="“ ; LET L0=0 

9923 LOCATE Y,X 

9924 POR CC“1 TO LO 

9925 PRINT 
992¡> NEXT CC 
9927 LOCATE Y,X 
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9928 PRINT 

9929 LOCATE Y p X 

9930 LET A*=INKÉY* 

9931 IF A**" " THEN GOTO 9930 

9932 IF At=CHRt<8) AND LG>0 THEN LET LÜ=LO-liLET D*=LEFT* <D* P LO) i LET X^X-llLGCA 
TE Y, X i PRINT "i LOCATE Y p XiGOTO 9930 

9933 IF A*“ M " ÜR A**”. J ' OR A#*"-" THEN GOTO 9936 

9934 IF A*=CHR4U3> THEN GOTO 9942 

9935 IF A*>Mf OR A*<W* THEN GOTO 9930 

9936 PRINT A*|” " 

9937 LET X=X+1 

9938 LOCATE Y P X 

9939 LET D*=D*+At 

9940 LET LO-LO+1 

9941 IF LOOLO THEN GOTO 9930 

9942 LOCATE Y,X 

9943 FGR CC*LO TO LO 

9944 PRINT " 

9945 NEXT CC 
. 9946 RETURN 



Como ejemplo veremos un programa que formaría parte de una agenda de nombres y 
teléfonos, 










■ mil 




I 




























mi ■ 






10 REM MUM ******* I* tf 

20 REM * PROGRAMA DE DEMOSTRACION PARA t 
30 REM i VER EL FUNCIONAMIENTO DE LA RU- * 

40 REM * TINA DE ENTRADA DE DATOS* S 

50 REM I t 

60 REM * VALIDO PARA IBM, MSX P AMSTRAD t * 

70 REM « SPECTRUM Y COMMODORÉ * 

BO REM ********************** ************* 

90 REM 
100 DIM R Í4Í 

110 CLSíREM < — EN EL COMMODORE SUSTITUIRLO PÜRt PRINT , <SHIFT-HOME>" 
120 LOCATE 1 * 1 1 PRINT "AGENDA TELEFONICA* 

130 PRINT w — — — *• 

140 LOCATE 4, 1 i PRINT "NOMBRE» w 
130 LOCATE 6, 1 i PRINT "APELLIDOS» " 

160 LOCATE B p 1 1 PRINT ''DIRECCION» " 

170 LOCATE 10*11 PRINT "TELEFONO»" 

180 FOR 1=4 TO B STEP 2 

190 LET Y“I 

200 LEI X*I2 

210 LET L0=20 

220 LET M*= “ Z " 

230 LET W*=“A n 
240 0OBUB 9900 
250 LET R*( < 1-21/2 }=D* 

260 NEXT 1 
270 LET Y=1Ü 
2B0 LET X=12 
290 LET L0=8 
300 LET M*=* f, 9" 

310 LET Ul*="O lí 
320 GOSUB 9900 
330 R*(4)=D* 

340 END 


Ejercicios resueltos 

dir un número, aceptase el principio y sólo al 
principio de la frase un guión? ¿Y que sólo ad- 
mitiese un punto decimal? 


EJERCICIO N. 8 1 

¿Serías capaz de modificar la rutina de 
entrada de datos para que, en el caso de pe- 
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«5 




"K 




































9900 REM 

gM»*****l^*#Í^ÍM**M?***********#*#****M********¡l 

t 














9901 REM 

9902 REM 

9903 REM 

* 

* 

* 

<<< RUTINA 

AMPLIADA ENTRADA DE DATOS 

>>> 

> 

* 

* 














RARA 

M5X, IBM, 

AM6TRAD, 

COMMODORE Y 

SPECTRUM 

i 















9904 REM 

9905 REM 

t*ttgt********ff*¥*************i*f*¥t¥********"***** 

4 variables que son necesarias pasarle a la rutina < 














9906 REM 

9907 REM 
9903 REM 

4 . 













* 

n 

(f 











w 

* V 


v nnupir t 

se i 

:mp 

rwtmA a s mc-ctm'íd 



i 




1 X 

* Y 

— LULUI'I^H i 

- FILA DONDE SE E 

1EZA A IMPRIMIR 




i 














9909 REM 

9910 REM 

t LO 
* M* 

= LONGITUD MAXIMA DEL DATO 
= MAXIMO CARACTER PERMITIDO 







* 

* 














9911 REM 

* W* 

= MINIMO 

CARACTEF 

í PERMITIDO 







* 






























t 





9912 REM 

9913 -REM 

* 

* EL 

DATO I 

INTRODUCIDO 

SERA 

DEVUELTO 

EN 

i Di 

1 

















9914 REM 

9915 REM 

9916 REM 

t 

* imo íaeu re 

:• 1 1 

T WTCRWÜMPNTF 







* 

* 














¡I — 



— 

— 



— 







* 














9917 REM 

9918 REM 

* LO 

* CC 

= CONTADOR 
- CONTADOR 

DE 

DE 

CARACTERES 

BUCLES 

INTRODUCIDOS 



* 

* 














9919 REM 

* A* = RECOGE EL CARACTER TECLEADO 


* 















HEIU 

9921 REM 
















9922 LEI 

t ÉTT 

D9-" " 

t 

LET LO-O 




























9924 LOCATE V, 

X 

TO 

II íl 
* 































9923 r QK 

9926 F 

CC =1 

*RINT 

LO 






























9927 NEXT CC 
992B LOCATE Y f 
9929 PRIMT M _ ,J 

X 





























































ttJO LOlhTc Y | X 

9931 LET AS^INKEY* 






























9932 IF A*** JM1 THEN i 

9933 IF A*=CHR*ÍB1 i 
*=LEFT*tDí,L0í : LET 

SOTO 9931 

WD LOO THEN 
X=X-li LOCATE 

LE” 

r L0=L0-1 
(SPRINT 11 

i LET SW=- ÍRIGHT# ÍDí 
_ . " : LOCATE Y, X t GGTC 

> p LG+i 
l 9931 


. ") 

: LET 1 

D 







9934 IF " 

9935 IF 

THEN 
AND í 

GOTO 9939 

3W-0 THEN LET 

5N- 

= lf 

BOTO 993= 




















9936 IF 

AND L0=0 1 

HEN GOTO 9939 























lí- = l 1 1 rttFH 7 “ 

993B IF A*>M* QR A*<W* THEN SOTO 9931 























9939 print A*j 

9940 LET X = X+1 

9941 LOCATE Y* 

\t O 






























X 






























9942 LET 

9943 LET 

Ü*^D*+m 

L0=L0+1 

1 






























9944 IF LOOLt 

9945 LOCATE Y, 

9946 FOR CC-LC 

) THEN 

V 

GOTO 

9931 


























) TÉ 

1 LO 





























9947 PRINT 

9940 NEXT CC 

■i i 

1 















• 















9949 RETURN 

































































































































SOLUCION 

Las modificaciones que se pedían eran muy sencillas de realizar. Hay muchas maneras 
de hacerlo. Una solución posible es la que se ofrece en el programa 5. 

La explicación de su funcionamiento os la dejamos a vosotros. 


Impresión de mensajes 
de distintas formas 

Los programas comerciales que se ven- 
den en las tiendas, aparte de ser más o menos 
prácticos o divertidos, suelen estar muy bien 


presentados para así hacer al usuario más 
agradable el programa. Uno de los trucos que 
más se utilizan es el de imprimir los mensajes 
de manera distinta a la usual. En este fascícu- 
lo daremos una serie de rutinas que tú puedes 
incorporar a tus programas para hacerlos más 
vistosos. 
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Antes de empezar te recomiendo que 
introduzcas la rutina 6 y ejecutes el programa 
5 ¡emplo (PROGRAMA 1.7) que te damos a con- 
tinuación. Así te harás idea de las posibilida- 
des de estas rutinas, 



PRESENTACION 

DE 

MENSAJES 



Fig. 5— Es muy importante , en los 
programas, la forma en que aparecen 
ios mensajes que se dan al usuario, 





«< IMPRESION HORIZONTAL TIPO TELETIPO >>> 


RUTINA 


COLUMNA DONDE SE EMPEZARA A IMPRIMIR EL 
FILA DONDE SE EMPEZARA A IMPRIMIR ÉL NEl 


MENSAJE 


A IMPRIMIR 


ANCHO DE LA PANTALLA O VENTANA EN CARACTERES 
RETARDO ÉNTRE LETRA V LETRA 


REM * 

REM * 

REM ¥ VARIABLES 
REM ¥ — 


RUT r NA NO DEVUELVE NINGUN VALOR 


UTILIZADAS INTERNAMENTE POR LA 


RUTINA 


CONTADOR DE BUCLE 
CONTADOR DE BUCLE 




REM 

L£T X-INTC ÍLF-LENíMfí )/2) 
LOCATE Y*X 


FOR CC-1 TO LEN < M* 3 
PRINT MIDfíMtfCC 
PLAY "LA4 D" 

FOR CD-I TO TI 
NESÍT CD 


NEXT CC 
RETURN 









; ■ 




©900 

QOA 1 






0TU 1 

B902 






B903 

9904 






B905 






8906 

0907 






0906 

Q909 






B910 






B91 1 
B912 






8913 

8914 

8915 











8916 

8917 






8918 






8919 

8920 






8921 

8922 






O I JLd C. 

8923 






8924 

8923 






8926 

0927 

©928 











8929 

8930 






8931 






0932 

8933 






8934 

8935 







Como puedes apreciar, esta rutina im- 
prime el mensaje letra a letra haciendo un so- 
nido cada vez que imprime una. La velocidad 


de impresión se puede regular dando valores 
más o menos grandes a la variable TI. 













PROGRAMA 

1.7 















- 
















































10 REM 

DCM 

* B&nrDAMrt C ICMDJ rfc DADA * 

























30 REM 

* r nuunni iri 

* UTILIZAR 

LA RUTINA 1.6 

¥ 

























40 REM 

50 REM 

**t**¥¥t¥¥*¥**********»**f 

























60 LET 

Y— 10 


í EE 


^1 EJEMPLC 



i 























70 LET 

80 LET 

rt*= i u 

LF=32 

i LFF 

J L/E_ Lrf'LJI IU 

1 























90 LET TI =50 

IOO G05UP 8900 
































litó; LET 

Y=1 1 

hdfj* 11 i- 





y% o 

•1 KT 1 

■ h 

ii 

























l. e. i i runurui^H t 

1 30 GOSUB 8900 

1 n nui i 

■ 

























140 END 
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TRUCOS T RUTINAS BASICAS 


Las variables que tenemos que pasar 
son las siguientes: 

Y = Le dice a la rutina en qué columna 
va a imprimir. 

M$ = Es el mensaje a imprimir, 

LF = Es la anchura de la pantalla en ca- 
racteres. Esta variable puede tomar cualquier 
valor entre 1 y el ancho de la pantalla. Si po- 
nemos un valor menor que el de la pantalla, 
como en la línea 8927 se ajusta el texto para 
centrarlo, el mensaje aparecerá desplazado 
hacia la izquierda. 

TI = Es el retardo entre letra y letra. 

Su funcionamiento es muy sencillo. En 
la línea 9927 se centra el texto. Si no queremos 
que nos lo centre, tendremos que darle a la ru- 
tina la variable X y hacer GOSUB 8928 en vez 
de GOSUB 8900. La variable X indica la colum- 
na donde empezará la impresión. 


En la línea 8928 colocamos el cursor 
donde corresponde. 

A partir de la línea siguiente (8929) co- 
mienza un bucle, gracias al cual vamos impri- 
miendo la cadena letra a letra usando la fun- 
ción MID$. Los usuarios del SPECTRUM tienen 
que sustituir las línes 8928, 8930 y 8931 por: 

8928 PRINT AT, Y,X; 

8930 PRINT M$ (CC); 

8931 BEEP 15,0,2 

A continuación viene un bucle en vacío 
(sin nada dentro del bucle) que lo que hace 
es perder tiempo antes de imprimir la siguien- 
te letra. 

Otra forma de imprimir mensajes es la 
que realiza la rutina 8 que aparece a con- 
tinuación. 


8800 REM ********************************** ******* ************** 

8801 REM * <<< IMPRESION HORIZONTAL CON DESPLAZAMIENTO »> 

8302 REM * 

8803 REM * PARA MSX , 1 BM , AMSTRAD , COMMÜDORE V SPECTRUM 

0904 REM ******************************************************* 

8803 REM f 

8B06 REM * VARIABLES QUE HAV QUE PASARLE A LA RUTINA 

8807 REM • 

8808 REM * 

8809 REM * X - COLUMNA DONDE EMPIEZA LA IMPRESION 

8810 REM * V = PILA DONDE COMIENZA LA IMPRESION 

381 1 REM * 

3812 REM * M* = MENSAJE A IMPRIMIR 

3813 REM * 

8814 REM * LF = ANCHURA MAXIMA DEL MENSAJE 

8815 REM * TI » PAUSA ENTRE LETRAS 

1816 REM * !■■■■■■■■■■! 

8817 REM * LA RUTINA NO DEVUELVE VALORES 
88 ÍB REM * 

8819 REM t VARIABLES USADAS INTERNAMENTE POR LA RUTINA 

BS20 REM * 

8821 REM * 

8322 REM * CC * CONTADOR OE BUCLE 

3823 REM * CD = CONTADOR DE BUCLE 

3824 REM * 

8825 REM * B* - STRING DE BLANCOS AUXILIAR 

«hmhhhmummumi 

8327 REM ******************************************************* 

8828 REM 
0B29 LET 

8630 FOR COI Tü LF+2 
8831 LET " 

8032 IMEXT CC 

8033 FOR COI TO LEN +1 
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8834 

0835 


LOCATE ¥ f X 
PRINT MID* 

(Bí+Mí+B* 

t.CC. LF1 

























803* 

9837 

0038 


PLAY 11 L*4 1 

D" 

■f 


r — 

— p — 



























run = i 

NEXT CD 

i U 1 

I 





























0839 

B840 

NEXT CC 
RETURN 































































Esta rutina hace que el mensaje vaya 
apareciendo por la derecha de la pantalla y 
se desplace hacia la izquierda carácter a 
carácter. 

Las variables que hay que pasarle son 
las mismas que las de la rutina anterior aun- 
que funciona de forma distinta. 

Para ver un ejemplo de su funciona- 
miento utiliza el programa 7 intercalando la si- 
guiente línea: 

65 LET X - 1 



Fig. 6.— El programa 1.8 hace que las 
letras entren por ¡a derecha de la pan- 
talla y desaparezcan por la izquierda. 


El programa, aunque es algo más com- 
plicado que el anterior, es muy sencillo, 

Lo que hace esta subrutina es crear una 


variable alfanumérica de longitud LF + 2 llena 
de caracteres en blanco (B$). Esta se unirá, a 
la hora de imprimir, con la variable que lleva 
el mensaje (M$), La rutina imprime series de 
LF caracteres, La primera vez que se realiza 
el bucle, que empieza en la línea 8833, se im- 
primen los primeros LF caracteres de la varia- 
ble B$. En la segunda vuelta se imprimen los 
caracteres que van desde el segundo a LF + 
1 . La tercera desde el carácter tres a LF + 2. 
La cuarta desde el cuarto a LF + 3, En LF + 3 
empieza a aparecer la variable M$ en la pan- 
talla (sólo el primer carácter). 

Al seguir ejecutándose este bucle dará 
la impresión de que el mensaje entra por la 
derecha de la pantalla y se desplaza a la 
izquierda. 

En el SPECTRUM habría que cambiar 
las líneas 8834, 8835 y 8836 por: 

8834 PR1NT AT Y,X; 

8835 PRINT B$ + M$ + B$ (CC TO CC + LF) 

8836 BEEP 15,0.1 

El siguiente programa, el 9, imprime de 
una manera muy distinta a lo que hemos visto 
hasta ahora. En este caso las letras van a salir 
disparadas desde una línea y van a llegar a 
otra donde se pararán e irán formando el men- 
saje. La mejor forma de ver esto es introducir 
la rutina 9 y ejecutarla con el programa 10. 



8*00 REM 
8*01 REM 
0*02 REM 


tmiitimHtMMmtmimtitmmtmmtut 

* <<< IMPRESION HORIZONTAL DE ABAJO ARRIBA >>> 


t PARA MBX t IBM, AM0TRAD, CQMMDDDRE Y SPECTRUM 

lutmtmimmiummMMmumttmtim 


8*04 REM 
8*03 REM 
060* REM 
0*07 REM 
8*00 REM 
0*09 REM 
BÓ10 REM 
8*11 REM 


* VARIABLES QUE HAY QUE PASARLE A LA RUTINA 


LINEA DE LA QUE PARTE EL EMNSAJE 
LINEA A LA QUE LLEGA EL MENSAJE 
COLUMNA DONDE EMPIEZA EL MENSAJE 
RETARDO ENTRE LETRA Y LETRA 


B6I2 REM 
8*13 REM 
6*14 REM 
0*15 REM 
S*l* REM 


MENSAJE A IMPRIMIR 


* LA RUTINA NO DEVUELVE NINGUN VALOR 


* VARIABLES INTERNAS DE LA 


RUTINA 


CONTADOR DE BUCLE 
CONTADOR DE BUCLE 
CONTADOR DE BUCLE 
DIRECCION DEL MOVIMIENTO 
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y 

8625 

FOR CC=1 TC 
IF MID4 (M* ? 
LET £T=1 

] LEN (M§) 





























8626 

862? 

,LL 


■ ■« 

" T He. N UOIL 

1 























B62B 

862<? 

IF 

Y1>Y2 THEN LET ST=-l 
en r rnavuQT m v? cjtfp 

ST 

























9630 



LOCATE > 

CD, 

X-l+CC 


v 1 
























0631 

8632 



PRINT M I D* < MI 
LOCATE CD-ST * 

-,C[ 

X- 

2 > 1 ) 

1+CC 


























3633 

6634 

0635 



PRINT 11 

¡rrvo r-cr— 

1+ 

t TO 1 

I 






























NEKT 

CE 




























0636 

8637 

NEXT CD 
PLAY "L64 A" 































0636 

NEKT 

CC 
































863t 

«fe 1 UKN 










































10 REM 

**************************** 




20 REM * PROGRAMA EJEMPLO PARA LA * 

30 REM * RUTINA 1.9 * 

40 REM **************************** 

50 REM 

60 LET Yl=20 
70 LET Y2=5 
SO LET X=1 
90 LET T! =20 

100 LET M*='‘PARECE GUE SON BALAS. " 

110 GOSUB 8600 

Como puedes apreciar, la ejecución de 
la rutina es bastante espectacular. 



ñg. 7— Con el programa 9 las letras , , 

salen disparadas, como balas, para 

Las variables que hay que pasarle a la 
rutina son las siguientes: 

Y1 = Línea de la que parten las letras. 

Y2 = Línea a la que llegan las letras. 

Estas dos variables tienen que tener 
distinto valor, pero cualquiera de ellas puede 
ser mayor que la otra. Por ejemplo, si decimos 
que Yl = 20yY2 = 5, entonces las letras irán 
de abajo hacia arriba; sin embargo, si decimos 
que Y1 = 5 y Y2 = 20, las letras irán de arriba 
a abajo. 


X = columna donde empieza la impresión. 
TI = retardo entre letra y letra, 

M$ = mensaje de imprimir, 

Su funcionamiento es el siguiente: 

Se hace un bucle desde la primera a la 
última letra del mensaje (línea 8625). Se anali- 
za si el movimiento es hacia arriba (ST = -1) o 
hacia abajo (ST = 1). A partir de este momen- 
to (línea 8630) se empieza a imprimir cada le- 
tra en todas las filas que van desde Y1 hasta 
Y2. De esta forma se consigue una sensación 
de movimiento. Cuando llegan a Y2 se quedan 
paradas. 

Cada vez que una letra llega a su lugar 
se espera un tiempo mediante un bucle vacío 
(líneas (8634, 8635)), se emite un ruidito (8627) 
y se continúa con la siguiente letra. 

Para el SPECTRUM hay que cambiar las 
líneas 8626, 8630, 8631, 8632 y 8637 por las 
siguientes: 

8626 1F M$ (CC) = “ “ THEN GOTO 8638 

8630 PRINT AT CD, X-l + CC 

8631 PRINT M$ (CC) 

8632 AT CD - ST, X - 1 + CC; 

8637 BEEP 15,0.1 

A continuación, ya para terminar, tene- 
mos una rutina muy parecida a la anterior 
pero con mensajes que se disparan horizontal- 
mente en vez de verticalmente. Con el progra- 
ma 1 1 podremos imprimir mensajes de dere- 
cha a izquierda. Cada letra entrará por la pan- 
talla por la derecha, se moverá muy rápido ha- 
cia la izquierda y se colocará en el lugar del 
mensaje que le corresponda. 


bsoo rem imMmmttiEtttHMtiMMmftmnmmiiMmmmi 

0501 REM * <« IMPRESION HORIZONTAL DE DERECHA A IZQUIERDA >>> * 
8502 REM * RARA I BM, MSX , AMSTRAD, COMMÜDORE Y SPECTRUM * 
B503 REM * * 
8504 REM ********************************************************** 
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B505 REM * 

0506 REH * VARIABLES QUE 


PASARLE A LA 


RUTINA 


0506 REH * XI 

5509 REH * X2 

5510 REH * Y 


= COLUMNA DE LA QUE PARTE EL MENSAJE 
= COLUMNA A LA QUE LLEGA EL MENSAJE 
= FILA EN LA QUE SE IMPRIME EL MENSAJE 
= RETARDO ENTRE LETRA Y LETRA 
- MENSAJE A IMPRIMIR 


RUTINA NO DEVUELVE NINGUN VALOR 


VARIABLES UTILIZADAS POR LA RUTINA 


S517 REM * 
0510 REM * 
B519 REM f 
6520 REM * 


CC = CONTADOR 
CD ^ CONTADOR 
CE - CONTADOR 


DE BUCLE 
DE BUCLE 
DE BUCLE 


MID4ÍM*,CC P 1> 

LET X2=X2+1 
FGR CD-XÍ TD X2 STER -1 
LOCATE Y, CD 
PRINT MID*<M* f CC, 1 ) j 
FDR C€=l TO TI 


THEN GOTO 


NEXT CE 


NEXT CD 


PLAY 


NEXT CC 


Las variables utilizadas son las siguien- 
tes: 

XI = Columna de la que parte cada 

letra. 

X2 = Columna a la que llega la primera 
letra. La segunda, como se coloca a la dere- 
cha de la primera, se pondrá en la columna 
X2 + 1, la tercera en X 2 + 2 y así su- 
cesivamente, 

Y = Fila en la que se desarrolla el 
mensaje. 

TI = Tiempo de retardo entre letra y 

letra, 

M$ - Mensaje a imprimir. 

En el SPBCTRUM habría que cambiar 
las líneas 8526, 8529, 8530 y 8534 por: 

8526 IF M$ (CC) = " " THEN GOTO 8535 

8529 PRINT AT Y, CD; 

8530 PRINT M$ (CC); ■ M 
8534 BEEP 15,0,1 


NOTA 


EN MUCHOS PROGRAMAS DE ESTE FASCICULO 
APARECE LA INSTRUCCION: 

PLAY 

ESTA ES VALIDA PARA IBM y MSX 

Para el Spectrum cambiarla por: BEEP 15,0.1 
Para el Am&txad cambiarla por: BEEP 
Para el Commodore quitarla 


Ejercicios resueltos 

EJERCICIO N,° 2 

¿Serías capaz de hacer un programa 
como el 1 1 , pero que, en vez de escribir de de- 
recha a izquierda, escribiese de izquierda a 
derecha, dejando el mensaje en su orden 
correcto? ¿Y en orden inverso? 

SOLUCION 

Como siempre, a un mismo problema se 
le pueden dar múltiples soluciones, En este 
caso la solución es casi inmediata, pues el pro- 
grama que nos ha quedado es casi igual que 
el 11, El programa solución es el 12. 

Para que el programa escribiese a la in- 
versa sólo hay que cambiar la línea 8525 por; 

8525 FOR CC = 1 TO LEN (M$) 

y el mensaje saldrá escrito al contrario. 

EJERCICIO N.° 3 

¿Cómo modificarías el programa 11 
para que fuese como el 9 y dejase, en un solo 
programa, escribir de derecha a izquierda y 
de izquierda a derecha? 

SOLUCION 

En este caso el problema es algo más 
difícil, pero no imposible. Una de las solucio- 
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TRUCOS Y RUTINAS BASICAS 


8500 rem nmitmmtmitm ********* * * mmm* ******** tt 

0501 RÉM * «< IMPRESION HORIZONTAL DE IZQUIERDA A DERECHA »> 

0502 REM * 

0503 REM * PARA IBM, MSX, AMBTRAD, CÜMMODÜRE Y SPECTRUM 

B504 rem 

8505 REM * 

8506 REM t VARIABLES QUE HAY QUE PASARLE A LA RUTINA 

0507 REM * — — — 

850B REM t XI - COLUMNA A LA QUE LLEGA EL MENSAJE 

8309 REM I XZ ■ COLUMNA DÉ LA QUE PARTE EL MENSAJE 

0510 REM * Y = FILA EN LA QUÉ SE IMPRIME EL MENSAJE 

83H REM * TI - RETARDO ENTRE LETRA Y LETRA 

0512 REM 4 m » MENSAJE A IMPRIMIR 

0313 REM * 

8514 REM * LA RUTINA NG DEVUELVE NINGUN VALOR 

0515 REM * 

0516 REM t VARIABLES UTILIZADAS POR LA RUTINA 

0517 REM t — 

8518 REM I CC - CONTADOR DE BUCLES 

0319 REM # CD = CONTADOR Dé BUCLES 

0320 REM t CE * CONTADOR DÉ BUCLES 

0321 REM % 

0522 rem mmmmtmtmtmtttmmtittumuittiiMtrnM 

0323 REM 

0324 LET X2“X2+1 

0523 POR CCbLENÍM*! TO 1 STEP -1 

8326 LET X2-X2-1 

0327 IF MID*<N* p CCp 1>- M M THEN GOTO 8535 
8526 POR CD“X i TO X2 

0529 LOCATE V,CD 

8530 FRINT " MID* ÍM*, CC P 1 ) 

0331 POR CE* 1 TG TI 

8532 NEXT CE 

0333 NEXT CD 

0334 PLAV "L64 A” 

0335 NÉXT CC 


nes que se nos puede ocurrir la encontrarás 
en el programa 13. 

Como siempre en este apartado, no ex- 
plicamos los ejercicios para que tú mismo seas 


capaz de comprenderlo. Si lo consigues, lo 
cual no es nada difícil, habrás comprendido 
mucho más que si te lo explicamos. 


0300 REM * * ttt tttt M* ***t * ******************** ******** ** ********** 
8301 REM t <« IMPRESION HORIZONTAL DE IZQUIERDA A DERECHA >» 

0302 REM t <« Y DE DERECHA A IZQUIERDA »> 

8303 REM * 

8304 REM I PARA I BM , MSX , AMSTRAD, COMMGEORE Y 0PECTRUM 

0303 rem iiitmmmmitmummmimMmimtiMtMimt 
8506 REM * 

0307 REM * VARIABLES QUE HAY QUE PASARLE A LA RUTINA 
ÉSOS REM * * — 

0509 REM * XI - COLUMNA A LA QUE LLEGA EL MENSAJE 

0510 REM * X2 = COLUMNA DE LA QUE PARTE EL MENSAJE 

0511 REM * Y » FILA EN LA QUE SE IMPRIME EL MENSAJE 

0512 REM 4 TI - RETARDO ÉNTRE LETRA Y LETRA 

8513 REM * M* * MENSAJE A IMPRIMIR 

8514 REM * 

0513 REM * LA RUTINA NO DEVUELVE NINGUN VALOR 
8516 REM * 

0517 REM * VARIABLES UTILIZADAS POR LA RUTINA 

8518 REM 4 — — 

8519 REM * CC *■ CONTADOR DE BUCLES 

0520 REM t CD • CONTADOR DE BUCLES 

8521 REM f CE - CONTADOR DE BUCLES 

8322 REM * 

8523 rem 

0524 REM 

0525 LET L2-1 

0326 LET L1*LENÍM*> 

B327 LET ST-1 

8328 IP XI >X2 THEN LET ST— 1 i LET L2-Lii LET Ll = i 

0329 LET X2«X2+ST 

0330 FOR CC-L1 TO L2 STEP -ST 

0531 LET X2-X2-ST 

0332 IF I1ID*ÍH* t CC, 1>~' M THEN GOTO 0542 

0333 POR CD-X1 TG X2 STEP ST 

8334 LOCATE Y P CD 

0333 IF BTM THEN PRINT 11 r j 

0536 PRINT MIDÍÍM* P CC, 1) | 

8337 IF ST— t THEN PRINT ” M 

0538 FOR CE*1 TO TI 

8539 NEXT CE 

8540 NÉXT CD 

0341 PLAY "L64 A" 

0542 NEXT CC 
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NOTA PARA LOS USUARIOS DEL SPECTRUM 


Las variables índices de los bucles, 
en el SPECTRUM, sólo pueden tener un ca- 
rácter como nombre. Por eso, si vemos un 
programa que pone: 

FOR CC = 1 TO 30 

este nombre (CC) no nos será aceptado. 
Para remediar esto se propone coger 


la segunda letra del nombre de la variable, 
Por ejemplo, si aparece: 

FOR CE = 1 TO TI 

nosotros pondremos: 

FOR E = 1 TO TI 

Hay que tener cuidado con que ésta 
variable (E) no exista ya en el programa. 
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EL TALLER DEL HARDWARE 


N esta sección vamos a tra- 
tar de presentar las posibili- 
dades de los ordenadores 
personales, desde el punto 
de vista del hardware y en 
general como añadir alguna 
parte adicional, para un ma- 
yor disfrute de la máquina. 
Para que los circuitos que describamos pue- 
dan ser utilizados en los ordenadores más co- 
munes, vamos a definir unas condiciones ge- 
nerales que deberán cumplir las conexiones y 
que puedan ser realizadas en cada uno de 
ellos. Si llevamos todas las señales necesarias 
a niveles apropiados y utilizamos un conector 
común, podremos conectar cualquiera de los 
dispositivos que diseñemos al ordenador que 
poseamos, 

Los ordenadores sobre los que se mos- 
trarán detalles son el ZX-Spectrum, Amstrad 
CPC-64, Comodore C-64 y el cada vez más di- 
fundido IBM- PC, por sus versiones originales 
o sus clones. Los ejemplos de aplicación son 
también utilizadles en otras máquinas, pero 
necesitarán realizar alguna adaptación. 

Ampliación de puertos 

de entrada/salida 

en un ordenador 
personal 

La mayoría de los ordenadores perso- 
nales poseen el conjunto de elementos nece- 
sarios para poder ejecutar programas de tipo 
recreativo, de proceso de textos, hoja electró- 
nica y gráficos sin ningún equipo adicional 


Pero hay muchas otras aplicaciones que pue- 
den verse mejoradas añadiendo algún perifé- 
rico sencillo. Sobre la idea de facilitar la co- 
nexión de nuevos dispositivos a nuestro orde- 
nador vamos a empezar con la descripción de 
una tarjeta, que puede adaptarse a cualquiera 
de los ordenadores y que permite la amplia- 
ción del número de puertos de usuario. A par- 
tir de esta tarjeta se irán proponiendo nuevos 
circuitos que amplíen las posibilidades de 
nuestra máquina, con un mínimo de esfuerzo 
en cada proyecto. 

El montar un conector universal en 
nuestro ordenador que nos permita añadirle 
los circuitos propuestos facilitará las conexio- 
nes futuras pero no es imprescindible, si sa- 
bemos convertir los circuitos descritos a las 
señales propias de nuestro equipo. 

Vamos a empezar por describir los cir- 
cuitos elementales que sirven para comunicar 
un dispositivo periférico con los buses de cada 
uno de los ordenadores más comunes: ZX- 
Spectrum, Amstrad CPC-64 y el IBM-PC. Se 
explican inicialmente los circuitos de interfaz 
más próximos a la CPU y en segundo lugar la 
conexión al conector común, Los bloques prin- 
cipales del conector universal son: Decodifi- 
cador de dirección, puerto de salida y puerto 
de entrada. Casi todos los circuitos que vamos 
a describir necesitarán al menos un bloque de 
cada uno de éstos, 


Decodificador de dirección 

La unidad central activa las señales del 
bus del ordenador periódicamente de acuer- 
do con un reloj. En cada instrucción se produ- 
cen pulsos que originan las transferencias de 
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EL TALLER DEL HARDWARE 


datos entre las diferentes unidades. En las 
operaciones de comunicación con los perifé- 
ricos, que son de entrada/salida, se activa el 
bus de direcciones con la dirección de la uni- 
dad que se accede, el acumulador o el regis- 
tro utilizado en la transferencia y el bus de da- 
tos con la información. En el bus de control las 
diferentes señales indican el tipo de opera- 
ción y el instante en el cual la transferencia se 
realiza. La lectura o escritura de la informa- 
ción por el circuito periférico debe hacerse de 
forma sincronizada con las señales del bus de 
control. 

I TI t T0 É TW S T3 ) 

RELOJ / \_J \ J \ / \ r 


AOJAIS ~X 


¡ORO 




RD 




\ 

► LECTURA 


DO DI 



s 


WR 



DO DZ 




b ESCRITURA 


Fig. 1. Señales generadas en operaciones E/S en Z80. 


Para la comunicación con los periféri- 
cos es necesario en primer lugar asignar a 
cada conjunto de bits que tengan entidad co- 
mún, una dirección que pueda ser accedida 
mediante la programación apropiada desde la 
unidad central. Es como su nombre para el or- 
denador. En segundo lugar será necesario di- 
señar el circuito que se ha de activar cuando 
se produzca la dirección bajo la cual ve la uni- 
dad central al periférico. La decodificación de 
una dirección consiste en la realización de la 
función AND con todos los bits que interven- 
gan en la dirección, tomando la señal o su in- 
versa según que en la dirección aparezca 
como 1 o como 0. El resultado de la función 
AND es 1 cuando todas las entradas son 1 , por 
lo que para los bits de dirección que apare- 
cen como 0, se tomará la señal complementa- 
ria, Con la señal obtenida se activará la carga 
de información desde el bus de datos al regis- 
tro del periférico o se pasará desde el perifé- 
rico al bus para que sea leída la información 
por la CPU. 

Generalmente se necesita decodificar 


un conjunto consecutivo de direcciones por lo 
que sería necesario disponer de varias puer- 
tas AND con el correspondiente juego de in- 
versores para cada señal que pueda necesi- 
tarse en modo invertido, Para estos casos se 
dispone de circuitos que incluyen la función 
de decodificador para 2, 3 o 4 bits, con lo que 
facilitan la obtención de señales de activación 
a partir de los bits de dirección de forma có- 
moda. Como añadido, estos circuitos permiten 
la selección mediante puentes de la dirección 
más apropiada para casos particulares, dentro 
del mapa de memoria o de puertos de entra- 
da salida. 

Veamos los primeros ejemplos de la for- 
ma de seleccionar dentro del espacio de di- 
recciones de puerto, para cada uno de los or- 
denadores personales, con la posibilidad de 
dejar para el final la dirección definitiva. Se 
genera la señal -SEL, Esta señal deberá ser va- 
lidada con las de lectura/escritura y entrada- 
salida, para realizar el acceso al periférico. 


ZX-SPECTRUM 

74LS32 



F¡g, 2.— Circuito de decodificación para Spectrum 



Fig. 3— Circuito de decodificación para Amstrad CPC-64 
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Fig 4 — Circuito de decodificación IBM -PC. 


SELWl 

x^os 1 

SELWO 

x’zor 

5ELR1 

X'ÍW 

SELWO 

x p 2or 


En las señales de selección generadas, 
hemos asignado los nombres SELWO, SELWl, 
3ELR0 y SELR1 a las direcciones correspon- 
dientes a zonas libres en cada una de las má- 
quinas. En los ejemplos futuros se utilizarán es- 
tas denominaciones para referirse a los puer- 
tos de escritura (SELW) y de lectura (SELR), 

Una forma todavía más cómoda de po- 
der seleccionar la dirección de operación de 
un puerto es utilizar un comparador, una de 
cuyas entradas es programable desde una di- 
rección fija de puerto, Así se permite desde 
el programa definir la dirección exacta don- 
de se ubica el puerto de comunicación. Para 
la primera versión de la tarjeta no utilizare- 
mos, sin embargo, esta forma de decodifica- 
ción. 

Las direcciones utilizadas en cada caso 
corresponden a zonas no utilizadas por otros 
dispositivos, y que por tanto no originan con- 
flictos, Sin embargo, si ya se le han añadido 
otros periféricos adicionales, podría haber al- 
guna incompatibilidad, que será necesario sol- 
ventar mediante el cambio de alguno de los 
bits de dirección. El C-64 es el único de los mi- 
cros descrito que utiliza direccionamiento de 
los dispositivos externos como si fueran me- 


Jitsua 



SELRl X’DEXr 

Sft.KCI X'DEXO' 


SELWl X'DEXV 

SELWO X'DEXO' 


Fig. 5. - Circuito de decodiíicación para Commodore C-64. 


moría. Los demás poseen señales propias para 
las operaciones de entrada/salida. También 
presenta el C-64 la particularidad de poseer 
un conector para puerto de usuario. Es bidi- 
reccional pues utiliza un circuito interfaz con 
posibilidad de asignación del sentido de las 
transferencias para cada bit, Este puerto de 
usuario hace las misma funciones que los 
puertos que estamos describiendo, pero sola- 
mente para 8 bits. 

La decodificación de direcciones pue- 
de hacerse de modo total o parcial. En el caso 
de que dispongamos de un equipo con pocos 
periféricos, puede ser cómodo y a la vez per- 
mite ahorrar algún circuito, dejar algún bit sin 
decodificar, con lo que se activará el circuito 
de decodificación tanto para la presencia de 
1 como de 0 en la posición no decodificada. 
Esto hace que un mismo puerto pueda acce- 
derse medíante dos o más direcciones dife- 
rentes. Esto suele denominarse creación de 
“alias", pues la segunda dirección es un segun- 
do “nombre" equivalente de la primera. Por 
cada bit dejado sin decodificar, duplicamos el 
espacio ocupado por cada puerto de entrada 
salida en el mapa de direcciones. 

En general es recomendable hacer una 
decodificación completa, con un circuito pare- 
cido al que se ha mostrado en la figura para 
el IBM-PC, sin pretender apurar al máximo el 
número de circuitos. En las máquinas peque- 
ñas es frecuente utilizar alguno de los bits al- 
tos de dirección para diferenciar cada zona de 
puertos, tal como se indica en la figura para 
el ZX-SPECTRUM. En esta máquina hay una 
asignación de bits del bus de direcciones para 
determinados periféricos. 


■ Puerto de salida 

El circuito más simple de salida hacia 
periférico está constituido por un registro de 
un solo bit, conectado a uno de los bit del bus 
de datos y que se se activa al producirse en 
el bus de direcciones la dirección correspon- 
diente. El contenido del bus de datos se car- 
gará en el registro de salida con el pulso ge- 
nerado por el decodificador y validado por las 
señales de escritura del bus de control. Si se 
utiliza registro de tipo D como el 74LS374, la 
transferencia se efectúa con el flanco de subi- 
da del pulso de control. Si se utiliza un regis- 
tro de tipo transparente (74LS273), la carga 
desde el bus comienza a hacerse desde el mo- 
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mentó en que la señal de control baja a cero, 
La información quedará retenida a partir de la 
subida de la señal de control. 

Generalmente interesará poder dispo- 
ner de los 8 bits, por lo que se conectará un 
circuito con posibilidad de almacenamiento 
de 8 bits. El circuito almacena la información 
transmitida desde el programa y la mantiene 
hasta que sea modificada o se apague la má- 
quina. Si se necesita transmitir una secuencia 
de pulsos o una señal variable con el tiempo, 
será responsabilidad del programa el hacer 
aparecer en los tiempos oportunos las configu- 
raciones de bits apropiados. Si es necesario 
modificar solamente uno de los bits del regis- 
tro de 8 bits, será necesario dar a los restan- 
tes la misma información que poseían para 
que no aparezcan transiciones inoportunas en 
la salida. El circuito de registro indicado cum- 
ple estos requisitos. 

El circuito integrado usado podría in- 
cluir alguna función adicional como por ejem- 
plo contador o registro de desplazamiento, 
con lo que podrán realizarse operaciones di- 
rectamente en la circuitería del adaptador, sin 
intervención de la unidad central, con el con- 
siguiente ahorro de tiempo. La mayor parte de 
los circuitos de interfaz de los equipos actua- 
les en OP, se diseñan utilizando circuitos inte- 
grados con posibilidad de programación, con 
lo que se obtiene mayor flexibilidad y ahorro 
si se selecciona el módulo apropiado. El cir- 
cuito empleado en el esquema debe conside- 
rarse como básico. Además el circuito en ge- 
neral deberá tener en cuenta las condiciones 
iniciales, asegurando que no se producen 
efectos dañinos al encender el equipo. 

La sentencia necesaria para escribir en 
el puerto de dirección DIR así montado la in- 
formación contenida en la variable de un oc- 
teto A es la siguiente: 

OUT DIR, A en BASIC para Spectrum, 
IBM-PC y Amstrad. Para Comodore como las 
operaciones con puertos son equivalentes a 
las de memoria, las instrucciones serám.POKE 
DIR, A. 

El SPECTRUM, sin embargo, utiliza los 
bits altos de direccionamiento a través de la 
ULA, para direccionar algunas líneas internas 
de la máquina, como por ejemplo la explora- 
ción del teclado se realiza sacando la direc- 
ción X'FE' en los bits bajos y de X'FE 1 a X7F‘ 
los bits altos para cada una de las semifilas del 
teclado, con un bit a 0 para cada semifila. Es- 
tas direcciones de 16 bits utilizables desde 
BASIC son descompuestas por el programa de 


control realizando dos operaciones de entra- 
da-salida de máquina, pero no son en realidad 
puertos con direccionamiento a 16 bits. 

Con transferencias a través de puerto 
la velocidad máxima de salida de octetos está 
limitada por el número de ciclos necesarios 
para llevar la cuenta y sacar y meter los da- 
tos. Es del orden de 10.000 octetos por segun- 
do el máximo posible con esta técnica. Si se 
necesita velocidad superior será necesario 
emplear DMA. Este método será descrito en 
otro capítulo posterior. 



Puerto de entrada 


El circuito más simple consiste en una 
puerta o un amplificador de bus, con tres es- 
tados, que se activen y den la señal en su sa- 
lida al producirse el pulso de decodificación, 
Esta señal permite a la CPU leer el contenido 
del bus de datos en el momento en que el am- 
plificador de entrada está activando el hilo 
correspondiente del bus. 

En el esquema de ampliación de puer- 
tos de E/S se han utilizado circuitos de ampli- 
ficación de tres estados de tipo 74LS244, con 
señal de control separada para cada 4 bits. 

La sentencia para leer el puerto así 
montado es la siguiente: 

A=INP(X) en BASIC para IBM-PC y 
A=rN X para Spectrum y Amstrad. Para C-64 
la sentencia A=*PEEK(DIR} realiza la misma 
función. 

Muchos de los circuitos integrados que 
realizan funciones específicas poseen como 
circuito de salida amplificadores de tres esta- 
dos, lo que Ies hace muy fáciles de conectar 
directamente al bus, controlando la señal de 
salida activa ( OE ) con la salida del decodifi- 
cador de direcciones (-SEL) validada con IOR 
para el IBM-PC o con IOR y RD para los orde- 
nadores que utilizan el micro Z80 como el 
SPECTRUM, 


t I Tarjeta de ampliación 
de puertos de E/S 

Con la descripciones de cómo realizar 
la decodificación de las direcciones y los 
puertos sencillos de entrada y salida en blo- 
ques separados, podemos diseñar para cada 
uno de los ordendores personales una tarjeta 
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: - propósito general que nos permitirá la co- 
nexión de muy diferentes dispositivos que am- 
:..en las posibilidades de nuestra máquina. El 
.r.terés principal radica en que con esta sen- 
tarjeta podremos realizar numerosos ex- 


perimentos, añadiendo simplemente en cada 
caso los componentes específicos para el en- 
sayo, pero teniendo ya la completa seguridad 
de que la tarjeta conectada al bus opera 
correctamente, Como sugerencia adicional 



SALIDAS 

0 


I 


SALIDAS 

1 


I 


ENTRADAS 

0 

I 


ENTRADAS 

I 

I 


F:g 6 —Tarjeta de ampliación de puertos de E/S 


MONTAJE PASO A PASO DE ESTA 

TARJETA 

En próximos números se describirá 
el montaje paso a paso de las tarjetas expli- 
cadas en el texto (para cada uno de los or- 
denadores indicados) con gráficos explica- 
tivos y fotografías reales del montaje. Se in- 
cluirá, también, la tarjeta necesaria para los 
equipos MSX con esquemas y diagramas 
completos. 
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añadiremos que conviene que uno de los 
puertos de salida pueda ser cableado en pa- 
ralelo con el de entrada de su misma direc- 
ción, para poder realizar interfaces bidirec- 
cionales en paralelo. 

Para probar el funcionamiento de la tar- 
jeta completa deberemos utilizar un polímetro 
para verificar que cada hilo de salida genera 
el nivel programado. Mejor todavía podremos 
montar un diodo LED en serie con una resis- 
tencia de 1 K. y conectado a la alimentación 
de +5 voltios. Conectado a las salidas, deberá 
lucir al programar un 0 y deberá apagarse al 
programar un 1. Igualmente para probar las 
entrada podremos conectar a +5 voltios o a 
masa cada uno de los hilos de entrada, mien- 
tras se ejecuta un pequeño programa en bu- 
cle que lea el puerto de entrada y presente 
de forma numérica el valor leído. 

La tarjeta que contiene los circuitos de 
puerto la montaremos con conectores hacia el 
exterior, adaptándose a cada tipo de ordena- 
dor, para facilitar la conexión de los circuitos 
futuros. Este conector deberá incluir: Las se- 
ñales de los puertos de entrada y de salida, la 
alimentación y masa. En los diseños tendre- 
mos presente la utilización de alguna de las 
señales de entrada y de salida para sincroni- 
zación con el restro del periférico, es decir 
para las señales de indicación de cuando está 
disponible la información en cada uno de los 
sentidos. 


Detalles constructivos 


Las conexiones al exterior de las dife- 
rentes máquinas se presentan de muy diver- 
sas maneras. Los ordenadores Spectrum, Alus- 
trad y Comodore disponen de conector único 
de expansión de tipo tarjeta de circuito impre- 
so, macho, con patillas separadas 2,54 milíme- 
tros y en número de 28 x 2, 25 x 2 y 22 x 2 res- 
pectivamente. El IBM-PC dispone de varios co- 
nectores de expansión, 5-8 según el modelo, 
de tipo hembra de 3 1 x 2 contactos. En la figu- 
ra se muestran los diferentes conectores con 
la denominación de cada contacto según la do- 
cumentación original. Es importante resaltar 
que denominamos cara de arriba a la que nor- 


malmente contiene los componentes y cara de 
abajo la que presenta las soldaduras. Para fa- 
cilitar la conexión de las tarjetas de los próxi- 
mos proyectos y de los experimentos en ge- 
neral, se sugiere colocar en la tarjeta un co- 
nector hembra con los terminales de entrada- 
salida de los puertos. Para terminación de los 
proyectos definitivos hay otras soluciones 
igualmente operativas y económicas, como 
por ejemplo los conectores de tornillo prisio- 
nero (ciernas o fichas), en la forma que indi- 
can los dibujos. 



fig. Ideas sobre el montaje de los proyectos . 

Las tarjetas resultarán más económicas 
si se realizan en circuitos de tiras o circuito im- 
preso de una sola cara, aunque requiere ma- 
yor espacio. Las conexiones entre circuitos se 
realizarán con puentes por el lado de los com- 
ponentes, 



Fig 8 — Tarjeta de proyectos. 
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APRENDER 




L objeto de esta sección es 
el aprendizaje, de una ma- 
nera amena, de una serie de 
conceptos que se estudian 
en la escuela. Para ello se 
utiliza la ayuda de los orde- 
nadores, que son un vehícu- 
lo de conocimiento absoluta- 
mente apasionante. La sección se subdivide a 
su vez en una parte dedicada a las aplicacio- 
nes de los ordenadores en las áreas de Natu- 
raleza y Tecnología y en otra especializada en 
temas de Sociedad, En la primera parte se tra- 
tarán problemas matemáticos, químicos, físi- 
cos, biológicos, etc. En la segunda se aborda- 
rán temas lingüísticos, idiomáticos, geográfi- 
cos. En ambas secciones existirán programas 
que sirvan para examinar sus conocimientos. 
Por último, existirá una parte dedicada a los 
más jóvenes de la casa, en la que se verán pro- 
gramas de aplicaciones sencillas. 


nal, lo cual significa que es imposible conocer 
con absoluta precisión su valor exacto, dado 
que consta de infinitas cifras decimales. Por 
ello se desarrollaron una sene de técnicas de 
aproximación para su cálculo, mediante las 
cuales podremos llegar a conocer con un cier- 
to grado de exactitud su valor. 

Una de las técnicas más exactas en su 
cálculo es el conocido como método de “Mon- 
te-Cario", llamado así porque se basa en la ge- 
neración aleatoria de puntos, simulando la ac- 
tuación de una ruleta o el de unos dados. 

El funcionamiento de este método es el 
siguiente: 

En primer lugar, se toma un cuadrante 
de circunferencia cuyo radio sea la unidad. 
Por este motivo el área de dicho cuadrante 
será: 

_ TE R 2 K. I 2 TE 
Area = — — - — — = - 



NATURALEZA Y 
TECNOLOGIA 


l! Problemas matemáticos 


Cálculo de PI por el método 
de Montecarlo 

El cálculo de PI no es algo convencio- 
nal. Como sabemos, PI es un número irracio- 


Podemos circunscribir el cuadrante de 
circunferencia en un cuadrado de lado 1. Su 
área valdrá uno. El programa se encargará de 
situar al azar puntos dentro de este cuadrado. 
Algunos de los puntos entrarán dentro del 
cuadrante de circunferencia, mientras que 
otros quedarán fuera. 

La relación entre los puntos que estén 
dentro del cuadrante de la circunferencia y 
los que estén fuera será aproximadamente 
igual a la relación entre el área del cuadrante 
y la del cuadrado, sobre todo al aumentar el 
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*• 



Punto ext. 


Punto int. 


Radio = 1 


Fig. 1 —Puntos exteriores ai cuadrante de ¡a circunferencia. 


número de puntos. Por tanto, podemos estable- 
cer la siguiente aproximación: 

K 

4 _ Ni 
i Ne 

donde Ni = Número de puntos interiores. 
Ne = Número de puntos exteriores. 

Es decir: 



Cuanto mayor sea el número de puntos 
que situemos aleatoriamente, mayor será la 
exactitud del método. 


Í0 REM ****##*####*#**###***#***#»+***#***»*********** 

20 REM * * 

30 REM * CALCULO DE PI POR EL METODO DÉ MÜNTE-CARLC * 

¿JO REM * * 

50 REM A#***##***#*****#**#***##*****#***********#**** 

60 PI = 3. 141592654* 

?Q REM 

B0 REM * DIBUJO DE LA PANTALLA * 

90 REM 

100 SCREEN 1,0 
110 CL3 

120 LOCATE 1*10 

130 PRINT •* CALCULO DE PI *' 

140 LINE < 30 , 20 ) - < 1 30 , 1 20 ) ,3,8 
150 CIRCLE (30,l2G) f lÜG,3,Ü,PI/2,i 
160 LOCATE ¿,19 
170 PRINT -Punto num. s" 

160 LOCATE 10,19 
190 PRINT “ Puntos ínt . : p i 
200 LOCATE 14,19 
210 PRINT -PI ¡“ 

220 REM 

230 REM * 1N1CIALI2AC10N DE VARIABLES * 

240 REM 

250 RANDÜM1ZE TIMER 
260 LOCATE 20,1 

270 INPUT “numero de puntos ^> n ,N 
280 DENTRO=Q 
290 REM 

300 REM * COMIENZO DEL BUCLE PRINCIPAL * 

310 REM 

320 FOR I=*l TO N 

330 X=RND:Y=RND * CALCULO DE LAS COORDENADAS DEL PUNTO 

340 DI S=X* 2+Y * 2 

350 IF D I S <“ 1 THEN DENTRÜ=DENTRQ+ 1 s C=2 ELSE 0*1 
3¿0 PSET ( <X#1 00 + 30 J ,(12G“Y#10Ü>> ,C 
370 LOCATE 6,31 
380 PRINT I ; 

390 LOCATE 10,31 
400 PRINT DENTRO 
410 LOCATE 14,24 

420 PRINT USIMG “ tt . H tttttttM* 11 |¡ DENTRO/ 1 * 4 
430 NEXT I 
440 REM 

450 REM * IMPRESION DEL VALOR CALCULADO FINAL * 

460 REM 

470 LOCATE 22,1 

480 PRINT “El yalor calculado de PI es í " ¡ DENTR0/N*4 
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Este programa es válido para IBM y compatibles, 
SPECTRUM: Todas las asignaciones han de ir pre- 
cedidas del comando 'LET\ 

Quitar la línea 100 

En donde aparezca TOCATE Y,X* 
cambiarlo por ’PRINT AT Y,X;\ X e Y 
pueden ser números o variables. 
Linea 140 PLOT 30,20;DRAW 
100,0:DRAW 0,1O0:DRAW 
-lOOjOrDRAW 0,-100 
Linea 150 CIRCLE 30,20,100 
Línea 250 RANDOMIZE 
Línea 360 PLOT 

(X*10O+3O),(12ü“Y*lOO) 


Linea 420 PRINT DENTRO/I*4 
Línea 470 PRINT AT 21,1; 

AMSTRAD: Línea 100 MODE 1 

Línea 140 PSET (3Ü,20):DRAWR 
(100,0):DRAWR (0,100):DRAWR 
(-10Ü,Ü):DRAWR (0,-100) 

Quitar la linea 150 
Línea 250 RANDOMIZE 
Línea 360 PLOT 

«X* 1Ü0+3OM 120-Y* 100)) 

La versión para MSX aparecerá en un próximo tomo. 



* CALCULO DE f»t w 

*. 

, ■ i 

\ * i 

Punto nun. í 1G0 


, A 

Puntos int,* SG 


" 1 

■ * §■ ■■ j 

■ 

F I : 3 „ 200000 

nuMei'b puntos “>1S0 

El VAlop catouf ááo de PI es ¡ 3*2 

■ 


Comentario del programa 

El programa de cálculo de PI por el mé- 
todo de Montecarlo realiza la función anterior- 
mente descrita. Genera una serie de números 
de coordenadas X,Y comprendidas entre 0 y 
1 y comprueba si el punto está dentro del cua- 
drante de circunferencia. Esto lo hace calcu- 
lando la distancia del punto generado al ori- 
gen y si ésta es menor o igual a 1 resultará 
que el punto será interior. 

Se ha utilizado un BASIC estándar en el 
programa, salvo, lógicamente, en el caso de 
los comandos gráficos. Si quisiéramos aumen- 
tar la velocidad del programa, podríamos omi- 
tirlos. De esta forma la exactitud en el cálculo 
de PI podría ser mayor, dado que tendríamos 
la capacidad de aumentar el número de pun- 
tos generados al azar sin que ello supusiese 
un tiempo de ejecución del programa dema- 
siado largo. 

Descomposición en factores primos 

Al efectuar la división de un número a 
cualquiera por otro número b cualquiera, pu'e- 
de suceder lo siguiente: 


— El resto de la división es igual a cero. 
En ese caso la división es exacta y b es divi- 
sor de a. 

— El resto de la división es distinto de 
cero. La división es inexacta. 

DIVISION EXACTA 


DIVISION INEXACTA 

flg. 2— Tipos de divisiones de un número natural. 



En general puede decirse que un nú- 
mero divide a otro cuando el resto de la divi- 
sión es igual a cero. El resto de una división 
puede considerarse como el resultado de res- 
tar del dividendo el producto del divisor por 
el cociente. Por otra parte, se denomina divi- 
sión entera al resultado dé obtener el cocien- 
te de un número sin decimales. Por tanto, pue- 
de decirse que el cociente de una división 
equivale al resultado de una división entera. 


96 

4 


— = INT. (96/8) 

© 


Fig. 3%-Eí cociente de una división equivale a una divi- 
sión entera 


Cuando en lenguaje BASIC dividimos 
un número por otro no obtenemos un resulta- 
do entero. Si quisiéramos obtener el cociente 
tendríamos que efectuar la división entera. 
Ello se expresaría del siguiente modo: 

COCIENTE = INT (DIVIDENDO/DIVISOR) 

donde INT es una función que calcula la parte 
entera de un número, es decir, el número sin 
decimales, por tanto, el cociente. 
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Por otra parte, se denomina número 
primo a aquél que sólo es divisible por sí mis- 
mo y por la unidad. Ejemplos de números pri- 
mos son, por ejemplo, el 2, el 13, el 29, etc. 

En este caso vamos a factorizar un nú- 
mero. Es decir, vamos a expresar un número 
cualquiera como producto de factores primos. 
Para ello se toma un número y se empieza a di- 
vidir por el primer factor primo diferente de 
1, esto es, el 2, Si el número es divisible por 2, 
éste es un factor primo del número, A conti- 
nuación se toma el cociente de la división an- 
terior y se divide de nuevo por 2, Se sigue este 
mismo proceso hasta que el número no sea di- 
visible por 2, en cuyo caso se repiten todos los 
cálculos para el siguiente factor, que es el 3. 

Este es el procedimiento que sigue el 


DESCOMPOSICION DEL NUMERO 5 664 


566 4 
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2 

2S32 
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5444 »2“5*3*I*5?'1*I 

Fíg. 4. —Descomposición en factores primos de un mime re cual- 
quiera, 

programa. El organigrama correspondiente 
sería el siguiente; 



1 = 

I + 1 

i 

r 


NO 



L 


I 1 

VISUALIZAR 
FACTOl 


» 


3 



Fig 5 -Organigrama del programa de descomposición en factores primos de un número . 
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PASATIEMPOS MATEMATICOS 





Ello se traduciría en el siguiente pro- 
grama; 



numero 


FACTORES 


530 PRINT TASUO) íNíTABÍ 
540 LET S(I)=SÍ I >+l 
550 LET N= A 


REtf ft*##*##*************##* 
REM * OI SUALI ZACI QN FINAL * 
ROI «i*****###*##*#**####*# 
PRINT I : B ‘ p ¡SCI> :"** : 


1040 RETURN 










" ;N 


















; * 















Binomio de Newton 
y triángulo de Tartaglia 

El desarrollo de la potencia natural de 
un binomio sigue la fórmula de Newton: 


(a + b)*N = 



a n <b a + 



a"' 1 'ó 1 + 



-t- 





son números combinatorios cuya fórmula es la 
siguiente: 


Este programa es válido para IBM, MSX, AM5- 
TRAD Y SPECTRUM. 

MSX: Cambiar las sentencias 'LO* 

CATE Y,X’ por 'LOCATE 
X,Y\ 

COMMODORE: Para similar la sentencia 

'LOCATE' utiliza el progra- 
ma que se da en la sección 
de TRUCOS DE PROGRA- 
MACION. 

Línea 80 PRINT CHR$(147) 


El programa consta de dos partes: 

— En una primera fase se realiza el pro- 
ceso de factorización visualizando los resulta- 
dos parciales. 

— En la segunda se efectúa la visuali- 
zación del número original descompuesto en 
factores primos. 

Para agrupar todos los factores comu- 
nes del número se ha utilizado una variable 
con subíndice denominada genéricamente S 
(N/2), siendo N el número que se desea des- 
componer. 


7 N \ N! 

.\m / (N - m)! - mi 

Fig 8. 

Si el número de sumandos es relativa- 
mente grande, el cálculo de todos y cada uno 
de los elementos puede ser una labor tediosa, 
Existe un método alternativo que permite ob- 
tener los coeficientes del binomio de Newton 
de una manera sencilla. Para ello vamos a 
construir un triángulo de valores numéricos 
que se denomina triángulo de Tartaglia, Su 
elaboración se basa en la siguiente propiedad 
de los números combinatorios: 



Fig. 9 


De esta forma se puede expresar un nú- 
mero combinatorio en función de dos que le 
precedan. El triángulo de Tartaglia sería: 
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I 

6 1 

1 i 1 
13 3 9 
14 4 4 9 
1 5 10 10 3 J 
1 ó 15 20 13 4 9 
1 7 11 33 3S 21 ? 1 
l e 20 34 70 54 20 S I 
1 34 04 124 1E¿ 04 34 P 1 

1 i O 45 L20 El O 252 29 0 120 43 10 l 

EL DESARROLLO DEL S 3 NiCM 1 O ES; 

<9*W 10 - 1 10 O 1* 10 »(4“ ¥ *b J t í* 43 -í** S í >* 120 »t** 7 

*b' 3 í» 210 #(*“ 4 pb’ 4 >* Z32 *¡4’ 3 «o" 3 i* 510 *(*’ 4 »b' 6 1+ ISO p(j" 3 
*b- 7 1+ 4S *(4- 2 *h- B )* ID *Ci* I *6- ¥ 5* 1 o *b J LD í 

Qfc 

Rg / 0. —Triángulo de Tartaglia y binomio de Newton de la dé- 
cima potencié 

Cada elemento del Triángulo está defi- 
nido por un número de fila y uno de columna. 
Un elemento será igual al elemento de la fila 
anterior, con igual número de columna, más el 
elemento de la fila anterior con el número de 
columna anterior, Por ejemplo, el 10, que está 
en la sexta fila y en la tercera columna, es el 
resultado de sumar el 6 que está en la quinta 
fila y la tercera columna y el 4 que está en la 
quinta fila y en la segunda columna. 


Cada una de las filas del triángulo se 
corresponde con los coeficientes de uno de los 
desarrollos de Newton. Los coeficientes de un 
binomio elevado a una potencia "n" serán los 
números de la fila "ri 1 del triángulo de Tarta- 
glia. 

El método de resolución del binomio de 
Newton mediante el Triángulo de Tartaglia es 
muy sencillo de convertir en programa en Ba- 
sic. Se trata de hacer sumas sucesivas para 
calcular cada fila en función de la anterior. El 
algoritmo es muy sencillo, ya que refleja de 
modo natural el método de generación del 
triángulo. 

El programa se ha realizado en un BA- 
SIC lo más estándar posible, Las sentencias de 
tipo gráfico son propias del ordenador Spec- 
trum, por lo cual habría que adaptarlas a cada 
ordenador. 


1 0 REM ************************** 


20 REM # RESOLUCION » 
30 REM * DEL * 
40 REM * BINOMIO OE NEWTON * 
50 REM * MEDIANTE * 
¿0 REM # EL * 


70 RB4 * TRIANGULO DE TARTAGLIA * 

BQ REM i****#*-**#-**#*#**#**#****#* 

90 DiM TRC20) 

100 TR< i )=1 : LP=8Q 
1 10 CLS 

1 20 REM #***##******#*#*»*» 

130 REM * MENSAJE INICIAL * 

140 REM *#********■###*»*»** 

150 LOCATE 10,10; FR INI* ESTE PROGRAMA CALCULA LOS COEFICIENTES DEL BINOMIO" 
1¿Q LOCATE 1 1 ,10 jPRINT"DE NEWTON BASANDOSE EN EL TRIANGULO DE TARTAGLIA* * 
170 LOCATE 1 3 , 1 0 : PRINT " LOS COÉFÍCI ENTES DEL BINOMIO SON LDS NUMEROS QUE" 
180 LOCATE í 4 * 1 0 i PRI NT "APARECEN EN LA BASE DEL TRINAGULO GENERADO." 

190 LOCATE 20,10: INPUT "INTRODUCE EL EXPONENTE <a+b>"",N 
200 IF N>!¿ TREN LOCATE 18,10:PRINT "DEMASIADO GRANDE" i GOTO 190 
210 REM i***##**»#*#***##****#***** 

220 REM # TRIANGULO DE TARTAGLIA * 

230 REM *■#**##****#*#**#*+#***#*** 

240 CLS 

250 PRINT : PRINT TAB<38>;1 
260 FOR 1*1 TO N 
270 TEMP=! 

280 FOR TO I 

290 UALOR=TR ( J > +TEMP 

300 TEMP=TR< J> 

31 0 TRC J>-UALOR 

320 NEXT J 
330 TR(I+1)=1 

340 REM **************************** 

350 REM * SITUACION EN LA PANTALLA * 

3¿G REM *##**#***###**#***^*****#**tt 
370 FIÍ= N * 

380 FOR J=1 TO 1+1 

390 FI*=FI*+STR*(TR< J>> 

400 NEXT J 

410 PRINT TA8£íLP-LEN<FI*>>/ 2> iH* 

420 NEXT I 

430 REM ********************* 

440 REM * UISUALI2AC10N * 

450 REM * DEL * 

4ó0 REM * BINOMIO DE NEWTON # 

470 REM ********************* 
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480 PRJNT 
490 PRINT" É 
500 PRINT 

:l i 
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>EL 

BINOMIO 

c e 

■ ,r 























to 

W 























510 PR INT“ ( a+b) * 
520 FOR 1=0 TÜ N 

";N 
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550 NEXT 
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Este programa es válido para IBM, MSX y AMSTRAD. 
COMMODORE: Las variables no pueden tener un SPECTRUM: 

nombre de más de dos caracteres. 

Por ejemplo, si una variable se 
llama VALOR, la cambiaríamos 
por VA* 

Sustituir los comandos CLS por 
PRINT CHR$U42) 

Para simular la sentencia lócate 
utiliza la rutina que se da en la 
sección de TRUCOS DE PRO- 
GRAMACION* 


Las variables dímensionadas no 
pueden tener más de un carácter 
como nombre* As:i, la matriz TRQ 
habrá que denominarla T(). 
Sustituir todos los LOCATE por 
PRINT AT. 

Las variables alfanuméricas no 
pueden tener como nombre más 
de un carácter. Así, la variable 
alfanumérica FI$ la cambiaremos 
por F$. 


SIMULACION DE FENOMENOS 


■ Simulación 

de la Ley de Gay Lussac 

Es de todos conocido que un recipien- 
te, como puede ser un émbolo cuyas paredes 
no sean rígidas, experimenta un aumento de 
volumen al aumentar la temperatura. Esta se- 
ría una forma de enunciar la ley de Gay Lus- 
sac. En este fenómeno intervienen dos varia- 
bles, que son la temperatura y el volumen, La 
presión se mantiene constante. La expresión 
matemática sería la siguiente: 

V/T-V’/T' 

Esta ley sirvió como base a la elabora- 
ción de la ley de los gases perfectos, cuya fór- 
mula es la siguiente: 

pV - nRT 

donde 

p es la presión 
V el volumen 
n el número de moles 
R la constante de Avogadro 
T la temperatura 


una de las teclas de movimiento del cursor 
arriba o abajo se observará que al pulsar la fle- 
cha hacia arriba el émbolo experimenta una 
expansión, es decir, un aumento de volumen, 
Al mismo tiempo el mercurio del termómetro 
también se expande, lo cual se traduce en un 
aumento de temperatura. Estos cambios se 
producen en sentido contrario al pulsar la fle- 
cha hacia abajo. 

Todo ello se refleja en una representa- 
ción gráfica. Se obtiene una recta, lo cual era 
previsible, dado que la relación entre el au- 
mento de volumen y el de la temperatura a 
presión constante y sin que se experimente 
una variación en el número de moles, es un va- 
lor constante. 



El programa es una simulación sencilla 
de la ley de Gay Lussac. En él se dibuja un ter- 
mómetro, un émbolo y una gráfica. Sí se pulsa 
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PULSA 'V PARA ACABAR 



APRENDER CON EL ORDEN 
Comentario del programa 



10 rem xxxxxxxxxxxxxxxxxxxxxxxx^^ 

20 rem x x 

30 REM % SIMULACION DEL COMPORTAMIENTO X 
40 REM X X 

50 REM X DE UN GAS A PRESION CONSTANTE X 

60 REM X X 

70 rem xxxxxxxx* 

80 MGDE 1 rCLSiCLG 

90 PEN 1 

100 LOCATE 15,5 

i 10 FOR E — 1 TO 20 : PRINT CHRSO 43> ; :NEXT ¡ 

120 LOCATE 15, lí 

130 FOR ¡*=1 TO 20 l PRINT CHR*< 1 43) j ¡NEXT E 

140 FOR i — 1 TO 7 ¡ LOCATE 35,¡+4iPRÍNT CHR*< í 43) ; :NEXT i 

150 MWÉ 200,64: DRAU 558, 64 , 1 ¡MOVE 224,48¡DRAW 224,206 

160 MOVE 28 1 48:0RAW 2B,332(M0VE 30,4e:DRAW 50,332 

170 ÜRAWR * 1 0 , 1 0 i DRAUR -2,0iORAWR -10,-10 

ISO PEN 3 

190 LOCATE 2, 23* PRINT CHR*Í 21 4> + CHR*< 1 43) +CHRSÍ 21 5> 

200 LOCATE 2 ,24* PRINT CHR* ( 21 3) +CHR*Í1 43) + CHR* < 21 2) 

210 PEN i 

220 FOR I = 1 TO 18r LOCATE 5 , i +4 ; PRINT" - N ¡NEXT i 
230 j-0 

240 FOR i =85 TO 0 STEP -5 
250 LOCATE 6,5+jtPRINT i; 

260 j= j + 1 ¡NEXT i 

270 LOCATE 35 ,22 J PRINT 11 t" , 

280 LOCATE i 4 , 1 3 í PRINT’ y" ; 

290 LOCATE 1 , i ; PRINT" USA LAS FLECHAS PARA AUMENTAR O REDUCIR" 

300 LOCATE 3, 2 ¡PRINT" LA TEMPERATURA Y OBSERVA EL VOLUMEN" 

310 MOVE 1 28 , 368 : DRAÍ4R 0,-16:DRAUR -64,GíDRAWR 0,-16 
320 MOVE 560 , 368 ¡ DRAWR Ü,-16¡DRAWR -64,QsDRAWR 0,-16 
330 LOCATE 1 5 , 24 ¡ PRINT" PULSA 'S J PARA ACABAR* i 
340 REM 

350 REM XX Inicial i cae ion de variables XX 
360 REM 

370 PE^34iPEN 2 ¡ E*=CHR*{] 43> : GOSUB H 70 ¡PEN 1 ¡ E*~CHRt< 207) :PE=33¡ GOSUB 1170 

380 T-0 :PT-22íPEN 3 (LOCATE 3,PTíPRINT CHR*< 1 43) ; ; PEN í 

390 M OVE 224 , 72 í PLOTR 0,0,3 

400 REM XX 8ucle principal XXX 

410 A*=INKEYS 

420 IF A*^CHR*(240) ANO T<85 THEN T=T+5í PT=PT“1 íGOSUB 1000 
430 IF A*=CHR*(241> ANO T>0 THEN GOSUB 1000¡T=T-5¡ PT=PT+1 
440 IF UPPER*<a*>="S* THEN 60TD 490 
450 GOTO 410 
460 REM 

470 REM XX Fin de bucle principal XXXXXXXXXXXXXX 
480 REM 
49G CLS ! CL3 

500 LOCATE 5 , 2 iPRlNT^Como habras podido observar al" 

510 LOCATE 5,3!PRINT" aumentar la temperatura del gas" 

520 LOCATE 5,4¡PRINT"el volumen de este aumenta, y* 

530 LOCATE 5,5*PRINT "al disminuir la temperatura el * 

540 LOCATE 5,6tPRlNT "volumen disminuye." 

550 LOCATE 5, 7 1 PRINT “ Por lo tanto la variación ' 

56Ó LOCATE 5,8íPRINT "del volumen es directamente pro-" 

570 LOCATE 5 , 9 ; PRINT * por c i onal a la variación de tem-* 

580 LOCATE 5 , 1 0 í PRINT " peratgra , siempre que esta ocurra' 

590 LOCATE 5,ll¡PRINT*a presión constante," 

600 LOCATE 5, 13 ¡PRINT* La formula que establece la " 

610 LOCATE 5 1 i 4 i PRINT" re 1 ac i on entre estas dos magnitu- - 
620 LOCATE 5 , i 5: PRINT “ de s se denomina LEY DE GAY-LUSSAC , ’ 

630 LOCATE 5, I 6¡ PRINT “y su expresión matemática es:* 

640 LOCATE 10, 10 ¡PRINT" V V' " 

650 LOCATE |0,19£FRINT* ■ 

660 LOCATE 10 ,20 ¡PRINT" T T' * 

670 ENO 
900 REM 

950 REM XX Subrutina de actualización XXXXXXXXXXX 

970 REM 

IODO IF A*=CHR*<240> THEN D*=CHR*<143) ELSE ' 

1010 PEN 3 í LOCATE 3, PT ¡PRINT D*;iPEN t 

1020 IF AS-CHR*(240> THEN GOSUB 1090 ELSE GOSUB 1130 

1030 IF Af=CHRSÍ24Q> THEN INX“16íINY=8 ELSE INX=-1 6 i INT=-8 

1040 ORAWR INX,INY,1 ¡PLOTR 0,0, 3 ¡PEN 1 

1050 RETURN 

1 060 REM 

1070 REM XX Subrutina de actualización del volumen XXXXXXX 
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1 

080 REM 
































1090 E*=CHR*(1 
Lino PF^PF-i 

43? 

: pen ; 

2 : GOSUB 

117 

0 
























! 110 E$=CHR*Í207> 

: PEN 

L ¡GOSUB 

Í7 

0 
























11¿U Kt 1 UKN 

1130 E^- ■ 

: GOSUB 

1 1 

70 





























1 

1 

140 PE=PE+1 

150 E*=CHR*(207> 

? PFW 

¡GOSUB J 

[17 

A 
























1 

160 RÉTURN 





u 
























ll/U tUH 1=1 TO 5 : LOCATE 
1180 PRINT Et: NEXT I 

PE, 

I+í 

5 

























1 

190 RETURN 



































































Válido para AMSTRAD, El resto de las versiones irán apareciendo en futuros tomos. 


PRUEBA TUS CONOCIMIENTOS 

Ü3 Test de geografía 

Aprender geografía supone el conocer 
los lugares en los que nos encontramos. Aun- 
que parezca mentira, no todo el mundo cono- 
ce la localización exacta de las ciudades de 


España, Este conocimiento es importante, por 
ejemplo, para realizar viajes por la Península, 
El programa pretende realizar un pe- 
queño test de las ciudades de España, Para 
ello se dibuja un mapa de la Península en el 
cual aparecerá una de las ciudades ilumina- 
das, de la cual es preciso determinar su nom- 
bre. Aparecen cinco posibilidades de las cua- 
les sólo una es correcta. 


10 

20 

30 

40 

50 

¿0 

70 

eo 

90 
100 
: no 
120 
130 
140 
150 
160 
170 
ISO 
190 
200 
210 
220 
230 
240 
250 
260 
270 
260 
290 
300 
310 
320 
330 
340 
350 
36Ü 
370 
360 
390 
400 
410 
420 
430 
440 
450 
460 


REM 

REM 

REM 

REM 

REM 

REM 


********** **************** 


** 

** 

** 

** 


TEST DE GEOGRAFIA 
MAPA DE LA PENÍNSULA 


*# 

** 

** 

** 


************************** 


MODE IíCLG 


LOCATE 1 

1 , 


9 ’ 
10 : 
,ll! 
, 12 ! 
,13: 
, 14: 
,15: 


■xxxx 

"XXXX 

"XXXX 

"XXXX 

M XXXX 


LOCATE 
LOCATE 
LOCATE 
LOCATE 
LOCATE 
LOCATE 
FOR X=i 
CLS 

REM ******************** 
REM ** DIBUJAR MAPA ** 
REM ******************** 


PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 


" xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx * 

XXXX" 


GEOGRAFIA 


XXXX* 
XXXX" 
XXXX" 
XXXX" 

h xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx M 


CIUDADES DE ESPAÑA 


T0 1000a NEXT X 


LOCATE 
DÍM 


i 0,2: PRINT 'CIUDADES DE ESPAÑA* 


a<47)t DIM b(47?t DIM a*<47>] DIM b*<4>: DIM c*<47> 
INK 3,20: INK 2 t Ó,20 
ORIGIN 6,5 6 
PLOT 99,0,1 
FOR x-í TO 101 
READ c,d 
DRAW c,d,j 
NEXT x 

REM ****************************** 

REM ** PONER PUNTOS DE CIUDADES ** 

REM ****************************** 

FOR k=1 TO 47 

READ c,d:LET a<x) = INT (c*l,6>: LET b(x>= INT <d*l.6) 
PLOT a ( x ) , b< x ? , 3 : PLOTR 1,0:PLOTR 0,1: PLOTR -1,0 
NEXT x 

**************************** 


REM 
REM 
REM 
FOR 

READ í x ) i LET 

NEXT x 

REM ********************* 
REM ** ESCRIBIR TEXT ** 
REM ********************* 
LET aa^47 
LET au=0 ¡ LET av~0 


** LEER NOMBRES CIUDADES ** 
****** ******************* **# 
x=l TO 47 

c$íx 
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APRENDER CON EL ORDENADOR 


470 FQR x— 1 TO 4j LET b* C x ) *• ■ :NEXT x 

480 LET ab-í +lNT(RND*aa> ; LEI ac” 1 + INTC RND*4 > 

490 LET ±1^1 

300 IF a*<ab)=t:S<al > THEN GOTO 52D 
510 LET »[=al+h GOTO 500 
520 LET b$íac>=afC*b> 

530 LET x=*b:PLOT a(X> + 1 ,b< x> , 2íG0SUB 870;PEN 1 

540 FOR x=l TO 4 

550 IF x=at THEN GOTO 630 

560 IF al =*47 THEN GOTO 400 

570 IF au=Q THEN LET b*( x >=c*( a I + 1 ) : LET au=i i GOTO 430 
580 IF a 1 = 1 THEN GOTO 400 

590 IF av=Q THEN LET b*< x >=c*í al -1) : LET au=iiGOTO 430 
400 LET at-I+INT (RN0*47)iLET b*< x >=cS( *t > 

410 FOR w=í TO x-1 i IF b*íw)=b*<x> THEN GOTO 400 
420 NEXT w 

430 LOCATE 24,13+x: PRJNT x; H - " íb*íx) 

440 NEXT x 

450 REM ###»## **#*####*#*# #**»#»**### 

440 REM ** EXAMINAR CONTESTACION ** 

470 REM X**#**#######*##*#*##»##»**** 

490 LOCATE 25, 9 í PRINT "CIUDAD?" 

490 LET eff=INKEY*i IF THEN GOTO 490 

700 LET aj=VAL Cd*>:IF aj (1 OR aj >4 THEN GOTO 490 

710 I F a j=ac THEN LOCATE 24,20 i PRINT “ CORRECTO'’ : GOTO 730 

720 LOCATE 24,20 i PRINT " INCORRECTO” 

730 PEN 2: LOCATE 24 , 1 3+ ac ¡ PRINT ac T . *¡bt<ac>;PEN 1 
740 LOCATE 5,24: PRINT “PULSE UNA TECLA PARA QONT I NUAR “ 

750 IF INKEY*=' ,I> THEN GOTO 750 
740 LOCATE 5, 24: PRINT " 

770 FOR x-5 TO 20 

780 LOCATE 24, x: PRINT “ 

790 NEXT x 

800 LET sí=ab : PLGT ai x ) + í , bí x ) , 0 ; GÜSUB 870 : PLOT AÍX>,B<X>,3¡ PEN 1 
810 IF aa=l THEN RESTORE 1100: GOTO 320 
820 FOR x=ab TO aa-i 

830 LET a*<x) = at(x+n :LET a< x >=a< x+ 1> : LET bCx>=bCx+l> 

840 NEXT x 
850 LET aa— aa~I 
840 GOTO 440 

870 PLOTR 0,3: PLDTR 3,0:PLQTR 0 , -3i PLüTfe -3,0 
880 RETURN 

990 REM ***#*#*##*##***#***** 

900 REM *#** DATOS #*** 

910 REM «a#*******#***##**#** 

920 DATA 101 ,23, 109,24, 1 17,25, 1 28 , 35 , I 4J , 37 T 149,37 

930 DATA 1 43 , 35 , 1 81 , 36 , i 84 , 38 , 1 90 , 35 , 1 99 , 3 1 ,204,59 

940 DATA 210 1 41 , 208 ,43,210,44, 229 , 48 , 230 , 74 , 232 , 90 

950 DATA 232,84,234,87,234 ,92, 237,93,249, 102,254 ,105 

940 DATA 254, 109,247,11 1 ,238, 128,234,144,274, 179 

970 DATA 268,181,285,195,304,203,307,204,330,221 

980 DATA 328 , 234 ,330 , 233 , 334 ,240,332,245, 323 , 244 

990 DATA 314,244,315,241,304,243,298,243,291,245 

1000 DATA 290,249,283,250,281 *250,261 ,254,262,250 

1010 DATA 243,250,234,252,235,249,227,255,202,248 

1020 DATA 198,268,194,272,182,248, 167,272,143,249 

1030 DATA 152,275, 1 29 , 272 , 92 , 280 , 42 , 279, 46 , 285 

1040 DATA 45,288 ,29,279,30,274,27, 275, 13,274,0,242 

1050 DATA 4,254,15,250,10,223,28,230,32,221 

1040 DATA 42 r 224 ,71 ,224,71 ,212, 7?, 212, 77, 20 8, 60,1 89 

1070 DATA 62,180,60,162,57,159,59,150,52, 14Í ,40, 140 

LOSO DATA 48 , 126,56, 1 1 6 , 46 , 108,45,99, 53,89 , 52 ,84,37 

1090 DATA 67,39,54,53,53,48,40,66,34,72,28,90 ,7,99,8 

1100 DATA 24,148,12,152,16,171,30, 164,58,170,61 ,153 

H10 DATA 91 ,171 ,79,141 ,92,148,105, 145,120, 147,110,158 

1120 DATA 114,148,125,157,139,132,147, 143, 164,130,201 , 143 

1130 DATA 190,128,174,123,153,95,126,103,102,110,113,135 

1 í 40 DATA 05,115,75, 132,56, 129,53,1 18,45,84,75, 129,34,72,92,105 

1150 DATA 1 18,96,147, 84,147, 59,135,50,123, 72,88, 72 

1160 DATA 36 , 70 , 33 , 37 , 44 , 1 8 , 50 i 30 1 73 , 48,78 ,23,93, 32 , 90 , 44 , 1 1 3, 25 

1170 DATA ORENSE , PONTEVEDRA , LA CORUNA , LUGO , OV1 EDO , LEON 

neo DATA SANTANDER, FALENCIA, BURGOS, BIL.BAÜ,$ ( SEBASTIAN VITORIA 

1190 DATA LOGROÑO , PAMPLONA , ZARAGOZA , HUESCA , LER I DA , GERONA 

1200 DATA BARCELONA* TARRAGONA , CASTELLON, TERUEL , GUADALAJARA , SORIA 

1210 DATA SEGOUIA^LLADOLID, ZAMORA, SALAMANCA, LACERES, AU1 LA, TOLEDO, MADRID 

1220 DATA CUENCA , UALENC I A , AL I CANTE ,MURCI A , ALBACETE , C I UDAD REAL, BADAJOZ 

1230 DATA HUELUA , CAO I 2 , SEU I LLA „ CORDOBA , MALAGA , GRANADA , JAEN , ALMERIA 


Programa válido para AMSTRAD. £1 resto de las versiones irán apareciendo en futuros tomos. 
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; - -J* 


CI UDüDES DE ESPAÑA 


— 


^ CIUDAD* 


. BARCELONA 

* LERIDA 

* GERONA 
- LUGO 


SOCIEDAD 

Programa de inglés 

El inglés es un idioma que en nuestros 
días es imprescindible. No es un lenguaje 
complicado, pero, lógicamente, es necesario 
aprenderlo. Como todos los idiomas, posee 
una gramática propia. En cualquier caso, no es 
de las más complicadas. Una de las partes más 
sencillas y que lo diferencia de los demás idio- 
mas es la sencillez de sus verbos. La forma- 
ción de un tiempo de un verbo a partir del in- 
finitivo es tan sencilla como añadir las letras 


"ed" al infinitivo del verbo en cuestión, en el 
caso de verbos regulares. En el caso del pro- 
grama que nos ocupa tratamos con los verbos 
irregulares. Para manejarse mínimamente con 
el idioma, no queda más remedio que apren- 
der las formas irregulares de los verbos. Ese 
es el objetivo del programa. Se han seleccio- 
nado una serie de verbos irregulares que se 
utilizan con frecuencia. El programa presenta 
en primer lugar, la lista completa de los ver- 
bos y luego pide que se introduzca la forma 
completa de uno de los verbos en cuestión. Lo 
único que debe hacerse es contestar correcta- 
mente. 



ID REM *»«**«••»*»•***»•**»** 

20 REM * PROGRAMA DE INGLES * 

30 REM * YERBOS IRREGULARES • 

40 REM *»»•*•*#»#««•»•»**#*** 

SO CLS 

éO DIM M*'20)tDIM P*C20>:Dm S*<20) 

70 DIM C(20) 

SO REM *•*****•»»**##**»«•• 

70 REM • LECTURA DE DATOS * 

Í00 REM ••»****•«******»•*•« 

110 FOR 1=1 TO 20 

120 READ V*CI > ,P*<I > ,S*(J > 

130 NEXT I 

140 REM *»•*«#*»*««**•**•***«*«»* 

190 REM • PRIMERA VI SUALI ZACI ON • 

140 REM **«*««»****#*■******»»#«»* 

170 PRINT TABdO) | “ LEE ATENTAMENTE * 

180 PRINT TAGdOJj* LA SIGUIENTE TABLA* 

170 PRINT TAB< 1D> ¡* LUEGO TENDRAS QUE RESPONDER* 

200 PRINT ¡PRINT 'ASEGURATE OUE TU TECLADO ESTA EN MAYUSCULAS* 
210 PRINT ¡PRINT 'PULSA CUALQUIER TECLA PARA CONTINUAR* 

220 LET A*=lNKEY*iIF A*=” THEN GOTO 220 
230 CLS 

240 FOR I“! TO 20 

290 PRINT V*CI) (TAB<10) |P*(1 ) ;TAB<20> ¡S*<I) 

240 NEXT I 

270 FOR 1=1 TO 5000 ¡NEXT I 
2BQ REM *•****«•**#• 

270 REM • PREGUNTA • 

300 REM *##*####*»## 

310 CLS 


57 




APRENDER CON EL ORDENADOR 













320 

330 

340 



350 

360 


370 


3B0 

390 



400 

4 1 0 


iiy 

420 


430 

440 


450 

440 

470 





480 
4 90 


500 


510 

520 


530 

540 


550 


5é0 

570 


580 

590 

595 



600 

¿10 


¿20 

630 

440 



630 

660 


670 


680 

690 


700 
71 0 


720 


730 

740 


750 


t Ov 

770 


780 

790 


eoo 

ptn 


Ü1U 

920 


830 

840 


850 




RANDQMIZE TIMER 
FCR J= ! TO 20 
CCS 

LET Í=INTCRND*2D)+1 
IF C(I>>0 THEN GOTO 350 
LET C<I)=CU>+1 

PRINT "EL INFINITIVO DEL VERBO ÉS¡";V*<I> 

PRINT " INTRODUCE LOS TRES TIEMPOS' 1 
INPUT V^P^S* 

IF V*=V*(I> ANO P*=P*(I> ANO S*=S*<í> THEN GOSUB 460 
GOSUB 540 

PRINT 41 PULSA UNA TECLA PARA CÜNT 1 NUAft ü 
LET Af^INKEYf íIF Af=*" THEN 443 
NEXT J 

REM ************ 

REM * CORRECTO # 

REM ************ 

PRINT * CORRECT 
LET A=A+L 

PRINT "ACIERTOS}' i A 
PRINT “FALLOS: " ;F 
RETURN 

REM ************** 

REM * INCORRECTO * 

REM ***** ********* 

PRINT ■ INCORRECT 
PRINT; PRINT " LA SOLUCION ERA" 

PRINT Vt<I >{" , “ rPt< I>| - /' \S%< I > 

LET F“F+I 

PRINT “ACIERTOS; A 
PRINT 'FALLOS; “¡F 
RETURN 

REM ********* 

REM * DATOS * 

REM ********* 

OATA CUT , CÜT , CUT 
DATA DR ! NK , DRANK f DRUNK 
DATA FALL * FELL , FALLEN 
DATA F IND, FOUND , FOUND 
OATA 00 f LIENT , QONE 
DATA KEEPjKEPT.KEPT 
DATA KNOL) , KNELJ , KNOLÍN 
DATA LEAVE , LEFT , LÉFT 
DATA LET ,LET , LET 
DATA NAKEjMADE.MADE 
DATA PAY , PA 1 D , PA I D 
DATA RUT i PUT , PUT 
DATA READ P READ,READ 
DATA RUN , RAN , RUN 
DATA SEE , SAW , SEEN 
DATA SET, SET, SET 
DATA SLEEPíSLEPTíSLEPT 
DATA TAKE ,TOOK , TAKEN 
OATA TELL , TOLO , TOLD 
DATA LfRITE t UROTE,UJRITTEN 





Válido para MSX, IBM, ÜMSTRAD y COMMODORE. 

COMMODORE: Línea 220 GET A$:IF AS=”” THEN Línea 320 RANDGMIZE 

GOTO 220 SPECTRUM: Línea 60 DIM VS^OJOJíDIM 

Linea 440 GET A$:IF R$= mt THEN F$(2Q,1Q);DIM $$(20,10) 

GOTO 440 
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CUT 

CUT 

CUT 

DRINK 

DRANK 

DRUNK 

FALL 

FELL 

FALLEN 

FIND 

FGUND 

FOUND 

60 

WENT 

SONE 

KEEP 

KEPT 

KEPT 

KNOW 

KNEW 

KNGWN 

LE AVE 

LEFT 

LEFT 

LET 

LET 

LET 

MAKE 

MADE 

MADE 

PAY 

RAID 

RAID 

PUT 

PUT 

PUT 

REAÜ 

READ 

READ 

RUN 

RAN 

RUN 

SEE 

SALÍ 

SIEN 

SET 

SET 

SET 

3LEEP 

SLEPT 

SLEPT 

TAKE 

TQQK 

taken 

TELL 

TOLD 

TOLO 

LJRITE 

WROTE 

WRITTEN 


Fig. 11— Tabla de verbos irregulares ingleses. 


EL INFINITIVO DEL VERBO ES :MAKE 
INTRODUCE LOS TRES TIEMPOS 
? MAKE , MADÉ , MADE 
CORRECTO 
ACIERTOS; 1 
FALLOS i 0 

PULSA UNA TECLA PARA CONTINUAR 


Fig. 12. — Test de inglés. 


PARA LOS MAS JOVENES 

El programa siguiente trata de que los 
más pequeños tengan la oportunidad de pro- 
bar sus conocimientos matemáticos frente al 
ordenador. Consiste en un programa que ge- 
nera aleatoriamente dos sumandos. Lo único 
que hay que hacer es determinar la suma, 


7151 

6831 

715 1 

6 031 

7 i 5 í 
6331 

7151 

¿831 

7151 

6831 

7! 51 
6831 

7 

72 

?S2 

7982 

73782 

1 3782 


ACERTASTE 
DESEAS CONTINUAR 


Fig. 13— Ejecución del programa de sumas. 













10 REM ########*###*»*»#:***# 








20 REM * PROGRAMA DE SUMAS * 
30 REM **»****#*#**#*»#*#*## 








40 CLS 

50 REM » QENERACI O 
60 LET Aí= INT< RND*75 












i HUTitKU; 

>7?>+l 

a * 







70 LET B= INT ( + 1 
BO LET fi-A+fl 




m * 1 






90 LET S*=STRSÍS> 
100 LET L=LEN<SS> 
110 REM * PANTALLA 









DE 

SUMAS 

* 








120 LOCATE 1 Ú , 1 0 : FR I NT U 
130 LOCATE ll.iOsPRINT U 

SING "#*»##" 

e; t k i r ■'auuát" 

íA 

iB 





140 LOCATE Í2,1Ü;PRINT - 

— 

rr ^wt 







150 r ÜR 1-1 TU L~l 
160 LOCATE 1 3 r I 4- 1 












170 PR1NT 

180 ASÍ I)=INKEY*í¿f 
190 A<I )=VAL(A*Í I )) 

■ ASÍ I 


- 1 

rHEN GOTC 

1 U 

30 



200 LOCATE 13,14-1 
210 NEXT I 

PRINT 

ASÍ 1 

í 
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280 REM * RESULTADC 
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Válido para MSX, IBM, AMSTRAD, 
COMMODORE y SPECTRUM. 

Nota: 

Ver comentados genérales de los demás programas y aplicarlos 
en éste. 


Tabla de conversión para diferentes ordenadores 




Tabla de equivalencias 



Mandato 

Sinclair 

Amstrad 

IBM 

Commodore 

MSX 

- Posición en la pantalla 
(C = columna, L = línea) 

PRINT AT F,C 

LOCATE C,F 

LOCATE C 


LOCATE C 

- Inicialización de núme- 
ros aleatorios 

- Generación de núme- 

RAND0MIZE 

RANDOMIZE TIME 

RANDOMIZE TIMER 

— 

RND (-1) 

ros aleatorios 

RND 

RND 

RND 

RND (1) 

RND (1) 

- Fin del programa 

- Matrices aifanuméricas 

STOP 

END 

END 

END 

END 

1, J, K... Indices 

L = longitud máx. 

A&IJ,.*) 

A$(I,J,K) 

A&IJ.K) 

A$(IJ,K) 

A$ai,io 
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APRENDER CON EL ORDENADOR 





Tabla de equivalencias 



Mandato 

Sinclair 

Amstrad 

IBM 

Commodore 

MSX 

- Dibujo de un punto en 

PLOT X.Y 

PLOT X,Y,C 

PSET(X,Y),C 



la pantalla 


PSET(X,Y),C 




- Dibujo de una línea en 

PLQT (XI, Yl): 

PLOT (Xl.Yl): 

LINE (X1,Y1)-(X2,Y2) 

— 

LINE (XLY1MX2.Y2) 

la pantalla 

DRAW (X2-X1,Y2-Y1)DRAW (X2.Y2) 




XI, Y1 = punto inicial 

X2,Y2 = punto final 
- Impresión con formato 


PRINT USING 

PRINT USING 


PRINT USING 

- Dibujo de circunferen- 

CIRCLiE X,Y,R 

— 

CIRCLE (X,Y) 


CIRCLE (X.Y), 

cías 



R, 1,0,360 


R, 1,0, 360 

X,Y = centro 

R = radio 

- Cambiar de pantalla 


MODEn 

SCREEN n 


SCREEN n 

N = número de pantalla 


n = 0^2 

n = Q-*3 


n = Ü-4 

- Borrar pantalla 

CLS 

CLS 

CLS 

PRINT CHR$( 1 47) 

CLS 

- Asignaciones 

LET 

LET o nada 

LET o nada 

LET o nada 

LET o nada 
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L ordenador supone para el 
empleado administrativo lo 
que el bulldozer para el 
peón, Esta frase fue pronun- 
ciada cuando los ordenado- 
res apenas si tenían diez 
años de existencia, pero el 
tiempo ha dado la razón a 
Sir George Thompson, miembro distinguido 
de la Royal Society, E incluso lo ha dejado cor- 
to. Hoy en día los ordenadores invaden nues- 
tra vida cotidiana, Se utilizan para todo: des- 
de serias investigaciones científicas, proyec- 
tos de ingeniería, medicina, gestión de los ne- 
gocios, hasta en tareas que nos resultan más 
cercanas, como el control de las reservas de 
billetes de avión, o ferrocarril, o el "control" del 
niño latoso que queda hipnotizado matando 
marcianos o arañas peligrosas. 

Pero no vamos a hablar al lector de las 
posibilidades de su ordenador, Este no es el 
objetivo que nos hemos fijado. Por el contra- 
rio, vamos a contarle un cuento ameno (o al 
menos eso es lo que pretendemos) sobre or- 
denadores. Vamos a hablar de la jovencísima 
historia de la Informática. 

Dividiremos esta sección en dos partes. 
Una de ellas será la historia de la informática 
propiamente dicha, y la otra, algunas anécdo- 
tas en las que se vean involucrados los pione- 
ros de esta Ciencia. 

Comencemos, pues, en la prehistoria. 
Como todos sabemos, el hombre comienza a 
contar utilizando los dedos de sus dos manos. 
Pero evidentemente, eso no es mucho. Y de 
ahí pasa a realizar sus primeros cálculos, ge- 
neralmente ordenando pequeñas piedras en 
grupos de diez, para más tarde pasar a contar 


los grupos formados (la palabra cálculo deri- 
va del latín “cálculus" que significa piedra), 

Sobre ios sistemas de contar, hablare- 
mos detenidamente en próximos fascículos, ya 
que existen algunos curiosísimos. 

Un avance sobre lo anterior lo constitu- 
ye la primera máquina de contar: EL ABACO, 
¿Dónde se “inventó" el abaco? Es una pregun- 
ta difícil, ya que este pequeño instrumento 
aparece por todo el orbe, desde tiempos in- 
memoriales, y en civilizaciones absolutamen- 
te distintas y distantes, como en la China, en 
Egipto, Grecia, etc.; pero, ¿sabía el lector que 
los españoles descubrieron en América otro 
abaco muy utilizado en las civilizaciones pre- 
colombinas? También hablaremos de ábacos 
chinos, romanos, egipcios, de la Europa me- 
dieval, e incluso japoneses. Pero no se asuste 
el lector, vamos a hablar además de otras mu- 
chas cosas curiosas e interesantes. 

Avanzando más aún, el hombre se en- 
cuentra con el problema de solucionar la no- 
tación adecuada para representar sus cálcu- 
los. Es un problema importante. Como ejerci- 
cio práctico, podemos intentar multiplicar 
CXXXVIII por MDCCXLIII. También veremos 
cómo a lo largo de la historia, o mejor prehis- 
toria, se ha ido resolviendo este problema fun- 
damental, por griegos, fenicios, bizantinos, ba- 
bilonios, mayas, etc., hasta llegar al perfeccio- 
namiento que le dieron los árabes. 

En 1617 aparece otro invento. Son unas 
pequeñas tablas de cartón, metal, madera o 
hueso, y su autor es nada menos que Juan Ne- 
per, el que inventaría más tarde los logarit- 
mos, Estas tiras, de las que hablaremos más 
adelante, servían para realizar multiplicacio- 
nes complicadas, como, por ejemplo, 3.568 por 
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2.845. Pero su invento revolucionario fueron 
desde luego los logaritmos, que simplificaban 
enormemente las operaciones de multiplica- 
ción y división de números, con virtiéndolas en 
simples sumas y restas. 

Todavía nos queda mucho camino has- 
ta alcanzar el más modesto y sencillo de los or- 
denadores actuales. Midamos cuidadosamen- 
te ese camino ¡con una regla de cálculo! 

La regla de cálculo es consecuencia di- 
recta del invento de Neper, Los logaritmos de 
los números se marcan en la regla y las mul- 
tiplicaciones y divisiones se hacen sumando 
o restando longitudes. Y ya estamos en el 
siglo XVII. 

Y aquí es donde aparece la primera di- 
ferencia de cálculo que se mantiene hasta los 
ordenadores modernos: unos son digitales, es 
decir, operan directamente con números y si- 
guen el sistema que tenía el abaco, que con- 
taba objetos determinados; y otros son analó- 
gicos, es decir, utilizan la manipulación de va- 
riables físicas análogas a las cantidades que 
se trata de computar (en un principio se ma- 
nipulaban ángulos o desplazamientos mecáni- 
cos, y después cantidades eléctricas, voltaje, 
intensidad de corriente, etc,). 

Las primeras máquinas de calcular me- 
cánicas son también del siglo XVII, Y, siguien- 
do el mismo principio que el abaco, en lugar 
de contar cuentas, lo que hacen es contar dien- 
tes de rueda, o ranuras de una barra lineal. 
Aquí el problema fundamental lo constituye el 
arrastre de una posición a la siguiente posi- 
ción más significativa (en primer lugar, las de- 
cenas). Evidentemente, la operación de paso 



Diagrama de la máquina analítica de Bahbage. 


debe ser automática (no como en el ábaco, en 
el que el usuario realizaba esta operación ma- 
nualmente). Este problema tampoco es una 
montaña para nuestros inventores de hace va- 
rios siglos: el engranaje se realiza por ejes ma- 
sivos, con reducción de diez a uno, o median- 
te engranajes desmontables, Todo ello es tan 
simple que, una vez explicado, resulta ele- 
mental. Lo veremos en los próximos fascícu- 
los, así como el sistema de suma de dos núme- 
ros mediante ruedas con trinquete. También 
veremos cómo restar y registrar los números 
en un contador, para obtener un resultado en 


Sabía usted que.. 


¿Usted ya sabe que un chip o circuito integra- 
do es sencillamente un pequeño rectángulo de sili- 
cio en el que mediante técnicas físicas, químicas y 
fotográficas (fotograbado) se implanta en su interior 
un circuito electrónico con multitud de transistores 
microscópicos? 

Los primeros circuitos integrados tenían unos 
100 componentes por chip, pero las técnicas han ido 
mejorando hasta el punto de que hoy en día, un cir- 
cuito integrado puede llevar en su interior hasta un 
millón de componentes, dispuestos en varias capas. 

Como las conexiones son indisociables de los 
propios componentes de los circuitos, el chip es mu- 
cho más fiable y mucho más rápido que los circuitos 
clásicos. Además, el proceso de miniaturización tie- 
ne enormes ventajas prácticas: menor volumen, me- 
nor consumo, menor disipación de calor, etc. 

Las condiciones de fabricación de los circui- 
tos integrados son muy estrictas. Las impurezas in- 
controladas pueden estropear los circuitos, y por 
ello el aire de los talleres se purifica exhaustivamen- 
te para eliminar el polvo que lleva en suspensión (en 
los hospitales, el nivel de polvo admisible es mucho 
más alto). Concretamente, en el ambiente del recin- 
to de fabricación de los circuitos integrados se exi- 
ge que el nivel de impurezas sea menor de 2.500 gra- 
nos de polvo por metro cúbico, mientras que en un 
hospital, el nivel admisible es de 35.000 granos por 
metro cúbico. 

En general, la fabricación es tan delicada que 
cuando se lanza la producción de un nuevo modelo, 
llegan a desecharse hasta el 96 % de los chips fabri- 
cados. 
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otro contador. Todos estos son problemas ya 
resueltos con nuestra máquina, la Pascalina, 
(su inventor fue el matemático y eminente fi- 
lósofo Blaise Pascal, que la diseñó para ayudar 
a su padre, que era recaudador fiscal). El pro- 
yecto lo realizó a los diecisiete años, pero la 
primera máquma , de la que quedan algunos 
modelos en París, sólo apareció en 1642. No 
nos detengamos más, por el momento en la 
máquina Pascalina, y sigamos avanzando en el 
tiempo. Sólo cuatro años después aparece 
otra máquina, con algunas mejoras sobre la an- 
terior, El proyecto se debe a Leíbniz, y en Han- 
novver pueden verse algunos ejemplares de 
su máquina, construida hacia 1671. El progre- 
so fundamental de esta nueva máquina frente 
a la anterior, es que aunque Pascal había con- 
seguido mecanizar las sumas, las multiplica- 
ciones eran lentísimas. Leibniz fue el que lo- 
gró superar este problema, mecanizando 
efectivamente la multiplicación. La máquina 
de Leibniz tenía desde luego innovaciones im- 
portantes como por ejemplo la rueda escalo- 
nada, de la que hablaremos más extensamen- 
te, y hasta hace pocos años se han utilizado 
este tipo de ruedas de Leibniz en las calcula- 
doras, 

Todos estos avances en la automatiza- 
ción de las máquinas se realizaron con gran- 
des esfuerzos. Nuestros inventores eran como 
nosotros, hombres de carne y hueso, aunque 
con ciertas cualidades excepcionales. Eran 
envidiosos con frecuencia, y se desprestigia- 
ban unos a otros. Muchos, también estaban 
amargados, por el enorme esfuerzo desarro- 
llado, que rara vez era reconocido y apoyado. 
Menos aún económicamente. La mayoría eran 
hombres tan innovadores que no podían ser 
comprendidos por el ciudadano medio de la 
época. 

Las máquinas de las que antes habla- 
mos eran absolutamente artesanales, ya que 
exigían gran precisión, lo que era imposible 
obtener con las técnicas de ingeniería de la 
época. Sin embargo, se hicieron varios inten- 
tos de fabricación de máquinas en serie, pero 
estos proyectos sólo pudieron llevarse a cabo 
de forma medianamente satisfactoria en el año 
1810. En Alsacia, Charles Thomas fabrica unas 
1.500 máquinas de este tipo en un período de 
unos cincuenta años. Algunas de las máquinas 
llevaban otro sistema diferente del sistema de 
ruedas de Leibniz, Pero no nos detengamos 
más por el momento, bastará con que indique- 
mos que las modificaciones más importantes 
se debieron a Baldwin y Ohdner. 


Hasta el momente hemos hablado de 
máquinas automáticas, aunque realmente no lo 
eran, Siempre necesitaban alguien que las ma- 
nejase. Evidentemente, el avance conseguido 
en rapidez se veía muy disminuido con la len- 
titud de las acciones que debía llevar a cabo 
el operador. Y las miras de nuestros antiguos 
hombres de ciencia se dirigían a conseguir 
una máquina totalmente automática, es decir, 
que no requiriera en absoluto la manipulación 
humana, El padre de esta idea fue Charles 
Babbage, que casi llegó a crear una máquina 
que cumpliera esas características. Fue profe- 
sor en Cambridge nada menos que en la cá- 
tedra del insigne Isaac Newton. ¡La verdad es 
que apenas si vio a sus alumnos unas cuantas 
veces, ya que estaba muy ocupado en resol- 
ver innumerables problemas: la moderniza- 
ción de la enseñanza de las matemáticas, en 
Cambridge el observatorio de Greenwich, la 
Oficina Postal, la industria tipográfica del mo- 
mento, y muchos otros organismos. La indus- 
tria de alfileres del Reino Unido también le 
debe gratitud! ¡Pero esos pequeños trabajos 
los realizaba en los días laborables! Los domin- 
gos tenía todavía tiempo para conducir un 
tren especial, y llevar a cabo una serie de me- 
didas dinamométricas para los ferrocarriles. 

Su aportación a la mecanización de 
cálculos fue enorme. Su primera máquina, la 
“Máquina de Diferencias", fue concebida para 
calcular e imprimir tablas de funciones mate- 
máticas. Con ella era capaz de representar 
cualquier función mediante polinomios con un 
grado de exactitud suficiente. En 1822 rea- 
lizó una demostración de la máquina y obtuvo 
una ayuda financiera considerable del gobier- 
no, y de la Royal Society para construir una 
máquina mayor. Pero Babbage era un científi- 
co, no un empresario, y aunque el gobierno le 
entregó sumas enormes para la fabricación de 
la máquina, la verdad es que no, Babbage no 



millares centenal decenas unidades décimas 


cubierta 


ruedas del 
registre de dates 


ventanilla* 


roedas 
de resultadas 

COA los 

escritos 


.11 

. 


Esquema de la máquina de calcular de Pasca!. 


63 







PEQUEÑA HISTORIA DE LA INFORMATICA 




■ 




■ 


estaba contento con su máquina de diferen- 
cias, su estudio ya no le interesaba, y lo que 
deseaba era diseñar otra máquina absoluta- 
mente automática, que partiera de concepcio- 
nes completamente distintas. No deseaba per- 
der el tiempo en sistemas anticuados... que se 
siguen repitiendo en el siglo XX. Efectivamen- 
te, en nuestros días se han utilizado esquemas 
de la máquina de diferencias en ciertas má- 
quinas contables. 

Pero la idea que Babbage llevaba en su 
cabeza era muchísimo más ambiciosa: su má- 
quina debía ser capaz de realizar cualquier 
cálculo automáticamente, debía ser una má- 
quina universal, capaz de realizar cualquier 
tarea si era programada (instruida) adecuada- 
mente —en contraposición con las máquinas 
de las que antes hablamos, que realizaban sólo 
una tarea concreta, para la que habían sido 
pensadas—. 

Babbage pensó en dotar a su máquina 
de los siguientes elementos (precursores de 
nuestros ordenadores de hoy): 

a) Un lugar de almacenamiento (la 

memoria actual) donde se guardaran los nú- 
meros del problema a resolver y también los 
generados por las propias operaciones de re- 
solución del problema. 

b) Una unidad capaz de realizar las 
operaciones aritméticas necesarias, utilizando 
los números almacenados. 

c) Un sistema de control, para que la 
máquina realice las tareas siguiendo la ade- 
cuada secuencia de operaciones. 

d) Un medio para introducir a la máqui- 
na los datos (números e instrucciones para que 
realice las operaciones en el orden correcto). 

e) Otro sistema de salida que muestre 
los resultados de una determinada tarea, 

Como puede ver el lector, la concep- 
ción de la máquina de Babbage es la misma 
que la de nuestros rápidos y eficaces ordena- 
dores modernos, y, sin embargo, cuántos años 
han sido necesarios para llegar a los ordena- 
dores de hoy. Babbage fue un hombre precur- 
sor de su tiempo, aunque tuvo enormes difi- 
cultades en sus investigaciones, ya que debe- 
mos recordar que los grandes inventores de- 
ben además luchar para que sus ideas se lle- 
ven a la práctica, se realicen. Todo lo plasma- 
do en el papel, debe cobrar vida, ser un ob- 
jeto real. Y los problemas son enormes, Los 
materiales de fabricación de la época no son 
todo lo fiables que se necesita, Y con frecuen- 
cia nuestros investigadores recurrían a otros 


inventos, que difícilmente se pueden relacio- 
nar con lo que nos ocupa. Veamos, por ejem- 
plo, el sistema de introducción de los datos en 
la máquina. Fue una réplica del utilizado en 
Francia por Jacquard en sus telares, A su vez 
Jacquard había basado su sistema en otro an- 
terior, modificándolo adaptándolo a sus nece- 
sidades concretas, incluso mejorándolo. El sis- 
tema de jacquard, del que desde luego habla- 
remos más extensamente, fabricaba jerseys y 
telas con los dibujos más complicados, utilizan- 
do combinaciones de colores increíbles. Para 
combinar los hilos utilizaba varillas metálicas 
y fichas perforadas, que indicaban a la máqui- 
no cuándo debía introducirse una determina- 
da varilla con ciertos hilos de colores y cuán- 
do no (naturalmente trabajaba con gran núme- 
ro de varillas). Babbage admiraba tanto a jac- 
quard que tenía un retrato suyo (creado con 
el sistema anterior) en el salón de su casa. Era 
la admiración de todo el que lo veía por pri- 
mera vez, ya que nadie observaba que estaba 
confeccionado en un telar. Gracias a Babbage, 
jacquard y otros como ellos, la industria del 


Sabía usted que... 


¿Sabía usted que Thomas Watson Sénior, fun- 
dador de IBM, fue carnicero y vendedor de pianos? 

Desde luego, su vida siempre estuvo ligada a 
las ventas. Había nacido en 1874 en el seno de una 
familia oriunda de Escocia. En 1892 comenzó su tra- 
yectoria profesional como vendedor de equipos me- 
cánicos (pianos, máquinas de coser, registradoras, 
etc.). Como tal corredor de comercio, ya conseguía 
comisiones récord (1.225 dólares semanales, cuando 
sus compañeros no conseguían alcanzar los 200). 

Su actividad comienza ya a tener un cierto pa- 
ralelismo con lo que sería unos años después, cuan- 
do es contratado por la NCR, a cuya cabeza se en- 
cuentra otro hombre insigne: Thomas Patterson. De 
su nuevo patrón, Watson aprende cómo debe gober- 
narse una empresa, Con él también asimila cómo de- 
ben ser las relaciones con sus empleados, a los que 
mima en sus necesidades, pero de los que exige una 
disponibilidad que ha sido artífice principal del éxi- 
to de la Compañía. 

Desde la fundación de IBM en 1924, hasta su 
muerte en 1956, su vida estuvo tan intrínsecamente li- 
gada a la Compañía que es difícil separar uno de la 
otra. 
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metal experimentó considerables avances. 
Pero ya hablaremos de las fichas perforadas, 
su historia y su decadencia. 

Babbage trabajó en su máquina analí- 
tica hasta su muerte, en 1871. Dio conferen- 
cias en el continente, pero murió amargado e 
incomprendido. Sus teorías eran demasiado 
modernas y ambiciosas, y además, y quizá por 
ello, su máquina nunca llegó a terminarse. 

Pero ¿dónde aparece una mano o me- 
jor un cerebro femenino en nuestra historia? 
Evidentemente, en el siglo pasado no muchas 
mujeres tenían acceso a buenos libros, e inclu- 
so a disfrutar de la compañía de hombres ex- 
cepcionales. Por todo lo anterior, resulta evi- 
dente que la primera mujer interesada en la 
mecanización tenia que ser noble: Lady Love- 
íace, hija única de Lord y Lady Byron. (Men- 
ciono a Lady Byron porque es de Lady Byron 
de donde heredó Lady Lovelace su afición a 
las matemáticas.) Esta inteligente dama siguió 
los pasos de Babbage a través de algunos ar- 
tículos publicados sobre él, tradujo y recopiló 
sus artículos y conferencias, y llegó a com- 
prender su proyecto totalmente. Es más, ex- 
ponía las teorías de su maestro con mucha ma- 


yor claridad y fluidez que él mismo, y pode- 
mos constatarlo en documentos de la época. 
A ella se atribuye la frase acertadísima "La má- 
quina analítica tiene ninguna pretensión de 
originar nada, sólo es capaz de hacer aquello 
que sepamos indicarle que haga". 

Sabía usted que... 

¿Sabe que uno de los primeros ordenadores, 
el ENIAC, funcionaba con válvulas y tenía tal consu- 
mo eléctrico que cada vez que se conectaba a la red 
bajaba la tensión en la pequeña ciudad próxima a Fi- 
ladelfia donde se encontraba? 

El ENIAC pesaba 30 toneladas, constaba de un 
millón de piezas y utilizaba 19,000 válvulas. Su prin- 
cipal inconveniente era que el paso de una determi- 
nada tarea a otra resultaba muy complicado (ya que 
requería manipulaciones en el cableado de la má- 
quina), y la memoria era muy pequeña. Su mejor cua- 
lidad era la enorme rapidez en los cálculos (frente a 
los métodos y máquinas existentes en la época). Fue 
diseñado para resolver problemas militares (cálculo 
de trayectorias, etc.). 
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Visión artificial (1) 





ACE más de veinticinco 
años que los investigadores 
comenzaron a preocuparse 
de la visión artificial, es de- 
cir, de dotar de "ojos” a las 
complicadas y serviciales 
máquinas que iban creando. 

En un principio, se pensó 
que la tarea era sencilla, pero el tiempo trans- 
currido desde entonces ha demostrado que la 
tarea no es en absoluto sencilla. Sin embargo, 
la visión por ordenador ha experimentado un 
avance notable en estos últimos años, ya que 
hoy en día, además de utilizarse las técnicas 
clásicas de Proceso de las Imágenes y Reco- 
nocimiento de Formas, el desarrollo de la 
Inteligencia Artificial ha supuesto una ayu- 
da enorme en la resolución del pro- 
blema, 

Realmente, ¿cómo podríamos definir la 
visión? La visión, según Marr, es "un proceso 
que parte de imágenes pertenecientes al 




mundo externo, y de ahí produce una descrip- 
ción útil al que mira, liberándole de aquella in- 
formación que pudiera ser írrelevante”. Sim- 
plificando la definición anterior, “la visión es 
un proceso que parte de imágenes pertene- 
cientes al mundo externo, las procesa, y de ahí 
obtiene una descripción útil, eliminando toda 
información que pudiera ser superflua. 

A pesar de que el investigador ha car- 
gado las tintas en la tarea de simplificar la in- 
formación que obtiene de las imágenes, cier- 
tas acciones fisiológicas del cerebro que pa- 
recen a simple vista elementales, resultan 
enormemente complicadas para un ordenador 
capaz de resolver operaciones complejas 
en milésimas de segundo. La enorme cantidad 
de datos recogidos para ser procesados hace 
que el tiempo de proceso sea largo, compli- 
cando enormemente la tarea. 

En concreto, ¿cómo se aborda el pro- 
blema? Se trata de un proceso secuencial, por 
el cual partiendo de la propia imagen, se ex- 
trae información sobre sus características 
(bordes, elementos notables, texturas, etc.) 
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para a continuación pasar a codificarlas ade- 
cuadamente (se analizan y agrupan en repre- 
sentaciones simbólicas, como zonas, contor- 
nos, etc), Con toda la información anterior, y 
tomando unos modelos previamente almace- 
nados en el ordenador, se obtiene una inter- 
pretación semántica de la escena. 

Otra forma de abordar el problema es 
partir de una "hipótesis-verificación" e irnos 
guiando por descripciones de la escena gene- 
radas por conocimientos previos, 

Pero, centrándonos en el primer méto- 
do, que es el más usual en las aplicaciones co- 
merciales, analicemos los elementos necesa- 
rios para trabajar. 

En primer lugar, necesitaremos una cá- 
mara de vídeo, que es el sistema más utiliza- 
do para tomar la información sobre la imagen, 
Fijémonos en el ojo humano: para cap- 
tar las imágenes, el ojo dispone de un sensor 
óptico, la retina. El emulador artificial de este 
sensor humano es precisamente la cámara de 
vídeo. El papel que realiza la cámara de vídeo 
se reduce a convertir en señales eléctricas las 
informaciones que ha tomado de la imagen. 
Sin embargo, la señal que devuelve la 



cámara de vídeo es una señal analógica, y 
como deseamos que el ordenador la procese, 
será necesario digitalizarla. 

Para digitalizar la imagen y convertirla 
en un conjunto de códigos (números binarios) 
que pueden ser procesados por un ordenador, 
se utiliza un conversor analógico/digital. 

La información digitalizada suele alma- 
cenarse frecuentemente en forma matricial en 
una memoria intermedia. Suele llamarse "cua- 
dro". 

A continuación, la información sobre la 
imagen (cuyas características, parámetros, 
bordes, están ya codificados), es procesada 
por uno o más microprocesadores (general- 
mente muchos). 

Por último, cuando la visión artificial se 
aplica a un proceso específico (principalmen- 
te en robótica), la señal digital es convertida 
a analógica por un convertidor, para que pue- 
da ser utilizada por el sistema de control de la 
máquina de que se trate, 

Por tanto, resumiendo, el sistema de vi- 
sión artificial consta, básicamente, de: una cá- 
mara para la captación de imágenes, con su 
controlador correspondiente, un conversor 
analógico-digital (que suele incluir elementos 
para el preprocesamiento de la imagen y su 
almacenamiento) y un sistema de reconoci- 
miento de formas a partir de la imagen digi- 
talizada, para su posterior clasificación. 

Veamos ahora los tipos de cámara que 
podemos utilizar. Fundamentalmente, existen 
dos tipos distintos: la cámara vidicón, y la de 
estado sólido. 

Las cámaras vidicón, "inspeccionan" la 
superficie sobre la que se proyecta la imagen 
línea por línea, generando por cada punto o 
pixel una señal (tensión), que es proporcional 
a la intensidad luminosa que tiene dicho pun- 
to. El número de líneas depende de la resolu- 
ción de la cámara, y las más utilizadas son de 
100, 256 ó 512 líneas. Estas líneas están dividi- 
das a su vez en 100, 256 ó 512 puntos, o ele- 
mentos gráficos, a los que se denomina 
corrientemente pixels (contracción de "pictu- 
re elements” o “elementos de imagen"). 

En las cámaras de estado sólido, se con- 
sidera una retícula, en la que cada pixel es a 
su vez considerado individualmente como 
sensible a la luz. Así, pues, el sensor de este 
tipo de cámara estará formado por una matriz 
de elementos fotosensibles. 

La señal que producen ambos tipos de 
cámaras es, como antes explicamos, en los dos 
casos una señal analógica. Como lo que desea- 
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mos obtener es una señal digitalizada, es de- 
cir, un conjunto de valores discretos (cada uno 
de los cuales representa un nivel de gris), uti- 
lizaremos un conversor analógico/digital. 

Veamos cómo se transforma una ima- 
gen en información digital. 

La imagen es captada por un sensor 
(dispositivo sensible a la luz). 

Sobre la imagen que ha captado el sen- 
sor se “coloca" una retícula que divide a la ima- 
gen en pequeñísimos puntos, y se mide la lu- 
minosidad de cada uno de esos puntos, 

Con los valores de la luminosidad de 
cada uno de los puntos se crea una matriz, en 


la que los distintos valores de luminosidad, 
que son números finitos, indican las distintas 
tonalidades de gris. 

Naturalmente, a mayor resolución de la 
imagen, mayor número de cuadradillos o cel- 
das de las que se toma la información, más ni- 
veles de gris y mayor calidad y definición, 

Si deseamos además obtener imágenes 
artificiales en color, todo lo anteriormente ex- 
plicado es válido, pero en este caso la toma de 
información se realiza utilizando tres cámaras 
(rojo, verde y azul), o una única cámara que 
disponga del filtro adecuado. En cualquier 
caso, si trabajamos con el color, dispondremos 



Escena original. 



Distancia. 


Reflecíancia 




Iluminación . 
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HUMANO 



Detalle jerárquico de un modelo humano tridimensional > 


de tres valores (rojo, verde y azul) cada punto 
o pixel correspondiente a la imagen, 

A partir de este momento ya podemos 
procesar la señal, que tendrá tantos niveles de 
gris como distintas combinaciones se puedan 
hacer con los bits de que se componga cada 
número, es decir, si el conversor A/D es de 8 
bits, existirán 2 elevado a 8, es decir, 256 ni- 
veles de gris. 

El ordenador utilizará la señal digitali- 
zada para deducir aquellas características de 
la imagen que necesite cada aplicación en 
particular. Para la deducción de estas carac- 
terísticas empleará algoritmos matemáticos 
específicos. Unos de los más utilizados son los 


obtenidos en el Stanford Research Instituía, 
por lo que se conocen con el nombre de SRI. 

Para la aplicación de estos algoritmos 
es muy importante, antes de aplicarlos, simpli- 
ficar al máximo la información obtenida. Un 
buen sistema es convertir la imagen (que te- 
nía muchos niveles de gris) en imagen bina- 
ria, Para pasar una imagen con varios niveles 
de gris a imagen binaria, se establece un de- 
terminado umbral de intensidad, de forma que 
cada pixel de la imagen que lo supera toma 
un valor 1, y cada pixel que no lo alcanza, toma 
un valor cero. Así, pues, habremos obtenido 
una imagen con menos información, pero por 
ello mucho más útil para aplicarle los algorit- 
mos, que nos permitirán deducir su períme- 
tro, área y muchas otras características. 

Los principales investigadores en la 
construcción de algoritmos SRI fueron R. O. 
Duda y Gerard Agin. 

Nada más plantearse el problema resul- 
tó evidente que sería imposible diseñar al- 
goritmos que se ejecutaran en tiempo real y 
sirvieran para imágenes de tipo general si no 
se simplificaban tremendamente las condicio- 
nes de aplicación y las características a exa- 
minar. 

Simplificando nosotros también, indica- 
remos que las condiciones que debe cumplir 




una imagen para poder ser analizada por es- 
tos algoritmos son las siguientes: 

a) Debe ser una imagen binaria. 

b) Las partes que forman el objeto suje- 
to a reconocimiento no deben tocarse ni su- 
perponerse. Si fuera así, se considerarían 

como una única parte. 

c) La imagen debe ser estable. No pue- 
de cambiar de posición. 

Con este tipo de restricciones, los algo- 
ritmos SRI, sin embargo, son muy útiles, y en 
la práctica, existen numerosísimas aplicacio- 
nes industriales en las que satisfacen las ne- 
cesidades. 

Los algoritmos SRI pueden determinar 
casi SO características diferentes del objeto 
(perímetro, área, momento de inercia, radio 
máximo, etc.). 

La visión artificial ha experimentado un 
enorme avance en los últimos años, debido 
principalmente al enorme auge de los micro- 
procesadores de 16 y 32 bits. Además, tanto 
procesadores como cámaras de vídeo han su- 
frido un abaratamiento considerable, lo que ha 
ayudado a que la industria demande este tipo 
de sistemas, que, como veremos, son útilísi- 
mos, y pueden desarrollar multitud de tareas. 

Actualmente son enormes las posibili- 
dades que ofrece la Visión Artificial: 

A) Automatización de infinidad de pro- 
cesos industriales: 

Tecnología VLSI, soldaduras de termi- 
nales, organización de chips. 

Guiado automático de todo tipo de 
herramientas (corte, soldaduras, plantas de 
embotellamiento, etc.). 


◄ 

Brazos automáticos: empaquetado y cla- 
sificación de objetos, etc. 

B) Proceso de imágenes obtenidas vía 
satélite. 

Previsión meteorológica. 

Creación de Cartas y Mapas, 

Estudio de zonas vírgenes sin explorar, 
por ejemplo, para un mejor aprovechamiento 
de sus recursos, agua, bosques, etc. 

C) Localización de fallos y errores de 
producción. 

En fundiciones, impurezas y fracturas. 

En empresas de vidrio, detección de 
posibles burbujas o fallas en el material. 

Detección de posibles fallos, cortocir- 
cuitos, etc., en circuitos impresos, y otro ma- 
terial electrónico, etc. 

D) En Medicina, Biología, Bromatología, 
etcétera, 

Detección de ciertas características es- 
peciales a partir de imágenes, para diagnós- 
ticos (rayos X, ecografías, etc ). 

Clasificación y recuento de células o te- 
jidos de todo tipo. 

Medición de parámetros de órganos, 
etcétera. 

E) En aplicaciones militares la visión ar- 
tificial puede tener una importancia enorme; 
veamos por ejemplo: 

Seguimiento y localización de objetos 
en movimiento. 

Trayectorias automáticas (misiles, etc.). 

Además, en todos los campos anterio- 
res, mejorando la tecnología, al favorecer la 
entrada de datos gráficos al ordenador. 
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GLOSARIO DE TERMINOS 
DE VISION ARTIFICIAL 


Algoritmo para la visión. Es un conjunto de 
operaciones desarrolladas en una secuen- 
cia preestablecida y conducente a la reso- 
lución de un problema específico que se re- 
pite frecuentemente. 

Tanto en el área de preprocesamiento de 
imágenes, como en el posterior reconoci- 
miento de formas, se utilizan numerosos loga- 
ritmos: algoritmos de la pirámide, o del árbol 
analítico de la cuadrícula, para el reconoci- 
miento de bordes, establecimiento de cilin- 
dros generalizados para la identificación de 
objetos dentro de una escena, técnicas de 
coincidencia con una plantilla o métodos lin- 
güísticos para clasificación de patrones, etc, 
La mayor parte de estos algoritmos están in- 
cluidos en los propios equipos de visión, o 
en los de control del sistema. 

Controlador. Convierte la imagen obtenida 
por la cámara en forma analógica en una 
imagen digital equivalente, El controlador 
establece la velocidad de extracción del 
sensor y produce la información auxiliar 
que sea necesaria para el proceso. General- 
mente va provisto de un dispositivo mues- 
treador, y de un convertidor A/D para 
cuantificar y digitalizar respectivamente la 
información visual, 

Estructuras en Array Procesor. Estructuras 
formadas por un conjunto de procesadores 
muy simples (en algunos casos de 1 solo bit) 
que realizan tareas aritméticas y lógicas 
muy simples (en algunos casos de un solo bit) 
tienen que estar siempre conectados a un 
ordenador central, que es el que realiza la 
carga de los programas en la memoria de 
la Unidad Central, o en las memorias loca- 
les de los procesadores del array. 


De lo anterior se deduce que un Array Pro- 
cesor no es nunca un dispositivo autónomo, y 
se utiliza para el proceso en paralelo de al- 
gunos algoritmos que sean susceptibles de 
adaptarse a su estructura. 

Normalmente, las filas (arrays) de procesado- 
res se conectan entre sí en estructuras com- 
plejas (mallas) que pueden llegar a tener 
hasta 128 x 128 procesadores elementales, 
como sucede en el computador STARAN, 

Extracción de las características de un ob- 
jeto. En un primer reconocimiento del obje- 
to, y partiendo de una representación sim- 
bólica, por ejemplo, de sus bordes se ex- 
traen las características que lo definen. 
Estas características pueden ser muy varia- 
das y dependen del equipo utilizado y del 
objetivo a conseguir, Los algoritmos SRI defi- 
nen casi 50 características distintas de un ob- 
jeto: área, perímetro, momentos de inercia, 
relación del perímetro al área, centros de 
gravedad, distancias de ciertos elementos 
notables al centro de gravedad, 

Histograma. Gráfico en el que aparecen 
aquellos pixels que tienen cierta intensidad 
luminosa establecida. De las imágenes de 
gradiente se pueden obtener histogramas 
sin excesivas dificultades, y seleccionando 
el umbral adecuado, se puede pasar a imá- 
genes binarias. 

Imagen de gradiente. En una imagen dada, se 
calcula el gradiente de cada uno de los 
pixels con respecto a los pixels adyacentes. 
De este modo, se crea una nueva imagen de 
gradiente que pone de relieve la diferencia 
de intensidad entre las líneas de los bordes 
y el resto de la imagen. Si no existe gradien- 
te de intensidad entre un pixel y los pixels 
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adyacentes a dicho pixel, se le asignará un 
valor cero. Con esta técnica todas las zonas 
homogéneas, claras y oscuras toman un va- 
lor 0, quedando evidenciados los bordes 
(zonas en las que los valores son distintos de 
cero). 

Multiprocesador. Conjunto de procesadores, 
cada uno de los cuales dispone de su pro- 
pia Unidad de Control, pero que comparten 
algún dispositivo común. Su conjunto cons- 
tituye una estructura de control más com- 
pleja. 

Nivel de gris. Se dice que una imagen tiene 
un determinado nivel de gris cuando está 
formada por puntos de distinta intensidad 
luminosa, que pueden tomar más de dos va- 
lores diferentes. Si la intensidad sólo puede 
tomar dos valores, la imagen estará en blan- 
co y negro. 

Procesamiento de imágenes. Conjunto de ta- 
reas previas a realizar en cualquier sistema 
de visión artificial para mejorar la calidad 
de la imagen y preparar las diferentes zo- 
nas de ella para su posterior análisis, 
Incluye dos grupos diferenciados de tarea: 
por un lado, las técnicas de reconstrucción 
de la «imagen ideal», y por otro las de me- 
jora de la calidad de la imagen de entrada. 
En el primer grupo se utilizan técnicas como 
la corrección geométrica, la modificación de 
la escala de gris y los procesamientos 
para obtener ángulos o suavizar curvas, 
análisis de regiones, etc, 

En el segundo grupo hay que realizar tareas 


como la eliminación del ruido, o el subraya- 
do de alguna de las características básicas 
de la imagen. 

Reconocimiento de formas. Tareas a realizar 
en un sistema de visión para el análisis de 
los objetos de la imagen y su identificación. 
Suelen seguir al preprocesamiento de las 
imágenes, En las tareas de reconocimiento 
de formas se suelen considerar dos etapas: 
extracción de características de la imagen 
e identificación. Las características que se 
suelen considerar dentro del escenario ob- 
servado son: imágenes intrínsecas de los ob- 
jetos (distancia, reflectancia, orientación, ilu- 
minación, luminosidad, especularidad, etc,), 
regiones, separación de regiones y amplifi- 
cación por campos, textura, etc. 

Segmentación. Es el proceso por el cual se se- 
leccionan los objetos de interés dentro de 
la imagen, con el fin de simplificarla. Gene- 
ralmente se utiliza la técnica de detección 
del borde, que suele aplicarse a imágenes 
binarias. Para obtener una imagen binaria 
de una imagen de nivel gris, basta con se- 
leccionar el umbral adecuado en el histo- 
grama de la imagen. Una vez establecido el 
umbral U, se asigna a todos los pixels cuya 
intensidad sea superior a U un valor 1, y a 
aquellos cuya intensidads sea inferior a U, 
un valor cero, 

Vector de características. Conjunto de ca- 
racterísticas representativas de un objeto 
que se utilizan para representarlo y para su 
posterior análisis o identificación, 
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Abaco (abacus). Dispositivo de origen muy- 
an tiguo que sirve para contar y realizar pe- 
queñas operaciones elementales de suma y 
resta, Existen muchos tipos, pero general- 
mente consiste en unas cuentas que van in- 
sertadas en unas guías, El operador desliza 
estas cuentas o discos por las guías para 
realizar las operaciones. 

Abortar (abort). Terminación forzada de un 
programa o procedimiento. Puede ser debi- 
do al sistema operativo, cuando se fuerzan 
condiciones no aceptables por el sistema o 
a un acto voluntario por parte del operador. 

Abrir un canal. Conexión lógica de la me- 
moria central del ordenador con un deter- 
minado periférico. Terminada la operación, 
el canal debe cerrarse, para asegurarnos 
de que la transferencia de datos se ha com- 
pletado satisfactoriamente. 

Abscisa. Una de las coordenadas carte- 
sianas. Normalmente se representa en 
el eje horizontal y se marca con una x. 

Absoluta, dirección. Dirección fija de la 
memoria del ordenador, que no depende 
por tanto de la dirección origen de un mó- 
dulo de programa (en contraposición a la di- 
rección relativa). 

Absoluta, comparación. Comparación in- 
dependiente del signo del número que se 
compara. 

Absolute code (ver código absoluto). 

Acceso aleatorio (random access). Posi- 
bilidad de acceder directamente a un ele- 


mento cualquiera de un fichero o de una 
memoria, sin el paso intermedio por un ín- 
dice, ni ninguna otra secuencia de acceso. 

Acceso secuencial. Acceso a los datos de 
forma que la lectura de los bloques de da- 
tos o registros se realiza en el orden físico 
en el que aparecen, hasta alcanzar el dato 
deseado. 

Acceso en paralelo. Acceso a un dispositi- 
vo de almacenamiento por el que se trans- 
fieren varios bits de información simultá- 
neamente (en contraposición con el acceso 
en serie). 

Acceso en serie. Acceso a un dispositivo 
mediante la transferencia sucesiva (bit a bit) 
de los datos. 

Acceso, tiempo de. Intervalo de tiempo en- 
tre el instante en que se solicita un dato de 
un dispositivo de almacenamiento y el mo- 
mento en que el dato está disponible en la 
CPU. 

ACK. Siglas para identificación del carácter 
de acknowledge, 

Acknowledge, carácter de. Carácter de 
«recibido». Este carácter es emitido por un 
dispositivo receptor de información como 
respuesta a una llamada o a un envío de 
datos. 

Acoplado (coupled). Generalmente se re- 
fiere a dos sistemas que pueden ser inde- 
pendientes, y están funcionando con algún 
tipo de cooperación. 
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Acoplador acústico. Dispositivo de interfaz 
para la conexión de un periférico o un ter- 
minal a la red telefónica a través de un te- 
léfono convencional (no un equipo prepara- 
do especialmente para la transmisión de da- 
tos). La conexión se establece marcando un 
número telefónico del mismo modo que se 
realiza para una conversación normal. Pos- 
teriormente, se acoplan auricular y micrófo- 
no del teléfono en unos receptáculos prepa- 
rados al efecto en el acoplador acústico. 

Acoplamiento mutuo (interface). (Véase 
interfaz). 

Acoustic coupler. (Véase acoplador acús- 
tico). 

Acoustic delay line. (Ver línea acústica de 
retardo). 

Actual, valor. Valor que tiene una variable 
o un parámetro en el momento en el que se 
considera. 

Acumulador. Registro en el que se almace- 
na temporalmente el resultado de una ope- 
ración aritmética o lógica. En ocasiones, se 
utiliza una posición convencional de memo- 
ria (no un registro) a modo de acumulador. 

ADA. Lenguaje de Programación de alto ni- 
vel, desarrollado para el Departamento de 
Defensa de los EE.UU. y dotado de caracte- 
rísticas especiales para trabajar en entornos 
de multiproceso en tiempo real, y para el 
manejo de gráficos. Se le dio ese nombre en 
honor de Lady Ada Lovelace, considerada 
la primera programadora del mundo, 

ADC, Analog/Digital Converter. (Ver 
analógico/digital, con ver sor). 

Address, constant (format, part, regís* 
ter). (Ver constante —formato, parte regis- 
tro— de dirección), 

ADP, Automatic Data Processing. (Ver 
proceso de datos automático). 

Agrupamiento. Reunión de varios registros 
para formar un bloque que puede transmi- 
tirse en una sola operación. Se suele dotar 
al bloque de una cabecera independiente 
de la de los registros que lo forman. 


Ajuste (justificación). También llamado 
justificación. Proceso de alineamiento de un 
dato o un texto en el espacio para él reser- 
vado: encuadre de un texto entre sus már- 
genes en un procesador de textos, aproxi- 
mación de un carácter (o número) a la de- 
recha (o a la izquierda) dentro del campo 
en que se almacenan, etc, 

Aleatorio, acceso. (Ver acceso aleatorio). 

Aleatorio, número. Número obtenido al 
azar, es decir, sin la utilización de ninguna 
secuencia o algoritmo predefinido para ob- 
tenerlo. Normalmente, en los ordenadores 
se aceptan como aleatorios los números que 
suministran las funciones correspondientes 
(en BASIC, RND, por ejemplo), aunque real- 
mente estos números son sólo seudo-aleato- 
rios. 

Alfanumérico. Carácter que puede ser un 
número o una letra alfabética. 

Algebra de Boole. Estructura algebraica de- 
finida sobre un conjunto mediante dos ope- 
raciones que cumplen unas determinadas 
propiedades. El conjunto (0,1), cuyos valo- 
res pueden ser tomados por los bits de un 
ordenador digital, con las operaciones Y 
(AND) y O (OR) tiene estructura de álgebra 
de Boole. 

ALGOL. Lenguaje de alto nivel concebido 
básicamente para la programación de pro- 
cesos matemáticos. Del lenguaje ALGOL ha 
derivado el popular lenguaje Pascal. Su 
nombre es un acrónimo de ALGorithmic 
Oriented Lenguage. 

Algoritmo (Algorithm). Conjunto de opera- 
ciones de cálculo desarrolladas en una se- 
cuencia preestablecida y conducente, en 
un número finito de pasos, a la resolución 
de un problema específico (en contraposi- 
ción a heurístico). 

Algorítmico, lenguaje. Lenguaje diseñado 
para definir algoritmos. 

Almacenamiento externo. También llama- 
do memoria externa. Dispositivo periférico 
del ordenador diseñado para almacena- 
miento de datos (discos, cintas magnéticas, 
etcétera). En contraposición a la memoria 
interna del ordenador (RAM, ROM, etc.). 
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